Update of /cvsroot/fink/dists/10.4/stable/main/finkinfo/libs/perlmods In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv9714/stable/main/finkinfo/libs/perlmods
Modified Files: io-pager-pm.info Added Files: io-pager-pm.patch Log Message: new version Index: io-pager-pm.info =================================================================== RCS file: /cvsroot/fink/dists/10.4/stable/main/finkinfo/libs/perlmods/io-pager-pm.info,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- io-pager-pm.info 16 Jul 2012 15:11:34 -0000 1.2 +++ io-pager-pm.info 21 May 2013 17:42:21 -0000 1.3 @@ -1,6 +1,6 @@ Info2: << Package: io-pager-pm%type_pkg[perl] -Version: 0.24 +Version: 0.31 Revision: 1 Description: Perl module to select a pager Distribution: (%type_pkg[perl] = 586) 10.5 @@ -14,8 +14,12 @@ # Unpack Phase: Source: mirror:cpan:authors/id/J/JP/JPIERCE/IO-Pager-%v.tgz -Source-MD5: c3bfc43fc20050e6648644b1fbb09bf4 +Source-MD5: 727579dccdda96cfcadbba9def8af59f +PatchFile: %{ni}.patch +PatchFile-MD5: 5d3b30d658eab3cb1df4b9c30d890f55 PatchScript: << + %{default_script} + # several parts of this test involve assuming perl interp is single word rm t/02-which.t << --- NEW FILE: io-pager-pm.patch --- diff -Nurd -x'*~' IO-Pager-0.31.orig/t/08-redirect.t IO-Pager-0.31/t/08-redirect.t --- IO-Pager-0.31.orig/t/08-redirect.t 2012-09-04 19:13:02.000000000 -0400 +++ IO-Pager-0.31/t/08-redirect.t 2013-05-21 13:39:31.000000000 -0400 @@ -3,6 +3,7 @@ use File::Temp; use Test::More; use t::TestUtils; +use Config; #Disable warnings for awkard test file mechanism required by Windows my(undef, $tempname) = do{ $^W=0; File::Temp::tempfile(OPEN=>0)}; @@ -11,7 +12,21 @@ #Print the heredoc in 08-redirect.pl to temp file via redirection my $q = q[']; $q = q["] if $^O =~ /MSWin32/; -system qq($^X -Mblib -MIO::Pager::Page -e $q require q[t/08-redirect.pl]; print \$txt $q >$tempname); +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 + } +} +system qq(@command $^X -Mblib -MIO::Pager::Page -e $q require q[t/08-redirect.pl]; print \$txt $q >$tempname); open(TMP, $tempname) or die "Could not open tmpfile: $!\n"; my $slurp = do{ undef $/; <TMP> }; ------------------------------------------------------------------------------ Try New Relic Now & We'll Send You this Cool Shirt New Relic is the only SaaS-based application performance monitoring service that delivers powerful full stack analytics. Optimize and monitor your browser, app, & servers with just a few lines of code. Try New Relic and get this awesome Nerd Life shirt! http://p.sf.net/sfu/newrelic_d2d_may _______________________________________________ Fink-commits mailing list Fink-commits@lists.sourceforge.net http://news.gmane.org/gmane.os.apple.fink.cvs