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

Modified Files:
        ChangeLog Config.pm 
Log Message:
Display Distribution label in 'fink -V' output


Index: Config.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Config.pm,v
retrieving revision 1.89
retrieving revision 1.90
diff -u -d -r1.89 -r1.90
--- Config.pm   20 Mar 2007 04:06:45 -0000      1.89
+++ Config.pm   20 Mar 2007 04:40:13 -0000      1.90
@@ -318,11 +318,15 @@
        
        if ($opts{showversion}) {
                require Fink::FinkVersion;
+
+               my $dv = Fink::FinkVersion::distribution_version();
+
                print "Package manager version: "
                        . Fink::FinkVersion::fink_version() . "\n";
                print "Distribution version: "
-                       . Fink::FinkVersion::distribution_version()
-                       . ' ' . $config->param('Architecture')
+                       . $dv
+                       . ', ' . $config->param('Distribution')
+                       . ', ' . $config->param('Architecture')
                        . ($config->mixed_arch() ? ' (forged)' : '')
                        . "\n";
                print <<"EOF";

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1444
retrieving revision 1.1445
diff -u -d -r1.1444 -r1.1445
--- ChangeLog   20 Mar 2007 04:06:45 -0000      1.1444
+++ ChangeLog   20 Mar 2007 04:40:13 -0000      1.1445
@@ -1,5 +1,9 @@
 2007-03-19  Daniel Macks  <[EMAIL PROTECTED]>
 
+       * Config.pm: Display actual Distribution string in 'fink -V'
+
+2007-03-19  Daniel Macks  <[EMAIL PROTECTED]>
+
        * Config.pm: Fix error msg if using new_with_properties
 
 2007-03-17  Dave Morrison  <[EMAIL PROTECTED]>


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to