From 97f908cfec6658d4f4f0ff3942e139a4cbcf5ef0 Mon Sep 17 00:00:00 2001
From: Remi Collet <fedora@famillecollet.com>
Date: Sat, 9 Mar 2013 09:57:41 +0100
Subject: mod_perl: sync with rawhide

---
 mod_perl-2.0.4-multilib.patch | 32 --------------------------------
 1 file changed, 32 deletions(-)
 delete mode 100644 mod_perl-2.0.4-multilib.patch

(limited to 'mod_perl-2.0.4-multilib.patch')

diff --git a/mod_perl-2.0.4-multilib.patch b/mod_perl-2.0.4-multilib.patch
deleted file mode 100644
index 34234a4..0000000
--- a/mod_perl-2.0.4-multilib.patch
+++ /dev/null
@@ -1,32 +0,0 @@
-
-Generate the XS typemap files in sorted order; ensures that the
-devel package contents do not differe across multilib platforms.
-
---- mod_perl-2.0.4/lib/ModPerl/TypeMap.pm.multilib
-+++ mod_perl-2.0.4/lib/ModPerl/TypeMap.pm
-@@ -442,12 +442,12 @@ sub typedefs_code {
-         $code .= qq{\#include "$_"\n}
-     }
- 
--    for my $t (@{ $self->{struct} }) {
-+    for my $t (sort {$a->[1] cmp $b->[1]} @{ $self->{struct} }) {
-         next if $seen{ $t->[1] }++;
-         $code .= "typedef $t->[0] * $t->[1];\n";
-     }
- 
--    for my $t (@{ $self->{typedef} }) {
-+    for my $t (sort {$a->[1] cmp $b->[1]} @{ $self->{typedef} }) {
-         next if $seen{ $t->[1] }++;
-         $code .= "typedef $t->[0] $t->[1];\n";
-     }
-@@ -470,7 +470,9 @@ sub sv_convert_code {
-     my %seen;
-     my $code = "";
- 
--    while (my ($ctype, $ptype) = each %$map) {
-+    for my $ctype (sort keys %$map) {
-+        my $ptype = $map->{$ctype};
-+
-         next if $self->special($ptype);
-         next if $ctype =~ /\s/;
-         my $class = $ptype;
-- 
cgit