[cvs] dists/10.4/stable/main/finkinfo/libs/perlmods http-tiny-pm.patch, NONE, 1.1 http-tiny-pm.info, 1.2, 1.3

[Daniel J. <dan...@us...>]

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

Modified Files:
	http-tiny-pm.info 
Added Files:
	http-tiny-pm.patch 
Log Message:
Patch to work with 10.6/i386.


Index: http-tiny-pm.info
===================================================================
RCS file: /cvsroot/fink/dists/10.4/stable/main/finkinfo/libs/perlmods/http-tiny-pm.info,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- http-tiny-pm.info	1 Jul 2012 15:54:50 -0000	1.2
+++ http-tiny-pm.info	2 Jul 2012 22:28:33 -0000	1.3
@@ -1,7 +1,7 @@
 Info2: <<
 Package: http-tiny-pm%type_pkg[perl]
 Version: 0.022
-Revision: 1
+Revision: 2
 Distribution: (%type_pkg[perl] = 586) 10.5, (%type_pkg[perl] = 5100) 10.5, (%type_pkg[perl] = 5100) 10.6, (%type_pkg[perl] = 5123) 10.7, (%type_pkg[perl] = 588) 10.5, (%type_pkg[perl] = 588) 10.6, (%type_pkg[perl] = 5123) 10.8, (%type_pkg[perl] = 5124) 10.7, (%type_pkg[perl] = 5124) 10.8
 License: Artistic/GPL
 Description: Small, simple, correct HTTP/1.1 client
@@ -15,6 +15,9 @@
 Source: mirror:cpan:authors/id/D/DA/DAGOLDEN/HTTP-Tiny-%v.tar.gz
 Source-MD5: efd18d2805baa3c9bb3df62a312d3b3a
 
+PatchFile: %{ni}.patch
+PatchFile-MD5: 61c43eabae4f0f8ad7dfeda12386d44a
+
 Type: perl (5.8.6 5.8.8 5.10.0 5.12.3 5.12.4)
 UpdatePOD: true
 

--- NEW FILE: http-tiny-pm.patch ---
diff -Nurd -x'*~' Package-Stash-XS-0.18.orig/t/00-compile.t Package-Stash-XS-0.18/t/00-compile.t
--- Package-Stash-XS-0.18.orig/t/00-compile.t	2011-01-05 14:18:07.000000000 -0500
+++ Package-Stash-XS-0.18/t/00-compile.t	2011-01-06 01:09:26.000000000 -0500
@@ -6,6 +6,7 @@
 use Test::More;
 use File::Find;
 use File::Temp qw{ tempdir };
+use Config;
 
 my @modules;
 find(
@@ -30,7 +31,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: {