Update of /cvsroot/fink/dists/10.7/stable/main/finkinfo/libs/perlmods
In directory vz-cvs-3.sog:/tmp/cvs-serv25604/10.7/main/finkinfo/libs/perlmods

Added Files:
        html-scrubber-pm.patch 
Log Message:
guess we want the .patch also


--- NEW FILE: html-scrubber-pm.patch ---
diff -Nurd -x'*~' HTML-Scrubber-0.09.orig/t/00-compile.t 
HTML-Scrubber-0.09/t/00-compile.t
--- HTML-Scrubber-0.09.orig/t/00-compile.t      2011-04-01 11:35:55.000000000 
-0400
+++ HTML-Scrubber-0.09/t/00-compile.t   2011-08-31 02:56:10.000000000 -0400
@@ -9,6 +9,7 @@
 
 use File::Find;
 use File::Temp qw{ tempdir };
+use Config;
 
 my @modules;
 find(
@@ -33,7 +34,21 @@
     # fake home for cpan-testers
     # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
 
-    like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ 
loaded ok" )
+    my @command;
+    if ($] >= 5.010 && $Config{"byteorder"} =~ /^1/) {
+        # little-endian means intel (not powerpc), for which fink has
+        # multiple single-arch distros that are seen by a single (fat)
+        # perl interp from apple for a perl version supported by fink
+        # (i.e., starting with 5.10.0). This is the logic taken from
+        # Fink::PkgVersion as of fink-0.29.13.
+        push @command, '/usr/bin/arch';
+        if ( $Config{"longsize"} == 4 ) {
+            push @command, '-i386';   # 32-bit
+        } else {
+            push @command, '-x86_64'; # 64-bit
+        }
+    }
+    like( qx{ @command $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ 
ok/s, "$_ loaded ok" )
         for sort @modules;
 
     SKIP: {


------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Fink-commits mailing list
[email protected]
http://news.gmane.org/gmane.os.apple.fink.cvs

Reply via email to