Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14209

Modified Files:
      Tag: dist-up-branch
        Services.pm 
Log Message:
oops

Index: Services.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Services.pm,v
retrieving revision 1.158.2.13
retrieving revision 1.158.2.14
diff -u -d -r1.158.2.13 -r1.158.2.14
--- Services.pm 18 Jun 2005 23:47:40 -0000      1.158.2.13
+++ Services.pm 19 Jun 2005 01:08:30 -0000      1.158.2.14
@@ -1277,8 +1277,9 @@
 sub checkDistribution
 {
        use Fink::Config qw($distribution);
-       
-       if (get_system_version() =~ /^\Q$distribution\E/)
+       my $system_version = get_system_version();
+
+       if ($distribution =~ /^\Q$system_version\E/)
        {
                # all is good, current os matches current dist.
                return 0;



-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to