Update of /cvsroot/fink/fink/perlmod/Fink
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv21635
Modified Files:
ChangeLog PkgVersion.pm
Log Message:
use Services::version_cmp when comparing two perl versions.
Index: PkgVersion.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/PkgVersion.pm,v
retrieving revision 1.618
retrieving revision 1.619
diff -u -d -r1.618 -r1.619
--- PkgVersion.pm 29 Mar 2009 23:49:26 -0000 1.618
+++ PkgVersion.pm 2 Apr 2009 21:55:05 -0000 1.619
@@ -5068,12 +5068,12 @@
### PERL= needs a full path or you end up with
### perlmods trying to run ../perl$perlversion
###
- ### But when $perlversion is (at least?) 5.10.0, we call it
+ ### But when $perlversion is at least 5.10.0, we call it
### with /usr/bin/arch instead
###
my $perlcmd;
if ($perlversion) {
- if ($perlversion eq "5.10.0") {
+ if (&version_cmp($perlversion, '>=', "5.10.0")) {
$perlcmd = "/usr/bin/arch -%m perl".$perlversion ;
} else {
$perlcmd = get_path('perl'.$perlversion);
@@ -5091,7 +5091,7 @@
($perlarchdir) = (`/usr/bin/env -i $perlcmd -MConfig
-eprint+Config::config_vars+archname` =~ /archname='(.*)'/);
} else {
# hardcode just in case :P
- if ($perlversion ge "5.8.1") {
+ if (&version_cmp($perlversion, '>=' , "5.8.1")) {
$perlarchdir = 'darwin-thread-multi-2level';
} else {
$perlarchdir = 'darwin';
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1585
retrieving revision 1.1586
diff -u -d -r1.1585 -r1.1586
--- ChangeLog 2 Apr 2009 15:11:14 -0000 1.1585
+++ ChangeLog 2 Apr 2009 21:55:04 -0000 1.1586
@@ -1,3 +1,8 @@
+2009-04-02 Dave Morrison <[email protected]>
+
+ * PkgVersion.pm: use Services::version_cmp when comparing two
+ perl versions.
+
2009-04-02 Daniel Macks <[email protected]>
* Validation.pm: Check if .deb has pathnames that would collide on
------------------------------------------------------------------------------
_______________________________________________
Fink-commits mailing list
[email protected]
http://news.gmane.org/gmane.os.apple.fink.cvs
