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

Modified Files:
        ChangeLog VirtPackage.pm 
Log Message:
Detect new growl 0.6

Index: VirtPackage.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/VirtPackage.pm,v
retrieving revision 1.72
retrieving revision 1.73
diff -u -d -r1.72 -r1.73
--- VirtPackage.pm      28 Feb 2005 02:36:09 -0000      1.72
+++ VirtPackage.pm      28 Feb 2005 15:49:13 -0000      1.73
@@ -991,7 +991,15 @@
        if (-x 
'/Library/PreferencePanes/Growl.prefPane/Contents/Resources/GrowlHelperApp.app/Contents/MacOS/GrowlHelperApp')
 {
                print STDERR "found, Growl\n" if ($options{debug});
                print STDERR "- checking for Growl version... " if 
($options{debug});
-               if (-f "/Library/Receipts/Growl.pkg/Contents/Info.plist") {
+               if (-f 
"/Library/PreferencePanes/Growl.prefPane/Contents/Info.plist") {
+                       if (open(FILEIN, 
'/Library/PreferencePanes/Growl.prefPane/Contents/Info.plist')) {
+                               local $/ = undef;
+                               if (<FILEIN> =~ 
/<key>CFBundleVersion<\/key>[\r\n\s]*<string>([\d\.]+)<\/string>/) {
+                                       $growl_version = $1;
+                               }
+                               close(FILEIN);
+                       }
+               } elsif (-f "/Library/Receipts/Growl.pkg/Contents/Info.plist") {
                        if (open(FILEIN, 
'/Library/Receipts/Growl.pkg/Contents/Info.plist')) {
                                local $/ = undef;
                                if (<FILEIN> =~ 
/<key>CFBundleShortVersionString<\/key>[\r\n\s]*<string>([\d\.]+)<\/string>/) {
@@ -1000,6 +1008,7 @@
                                close(FILEIN);
                        } 
                } else {
+                       print STDERR 
"/Library/PreferencePanes/Growl.prefPane/Contents/Info.plist not found... " if 
($options{debug});
                        print STDERR 
"/Library/Receipts/Growl.pkg/Contents/Info.plist not found... " if 
($options{debug});
                        $growl_version = "0";
                }

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.893
retrieving revision 1.894
diff -u -d -r1.893 -r1.894
--- ChangeLog   28 Feb 2005 05:14:57 -0000      1.893
+++ ChangeLog   28 Feb 2005 15:49:13 -0000      1.894
@@ -1,3 +1,7 @@
+2005-02-28  Justin F. Hallett  <[EMAIL PROTECTED]>
+
+       * VirtPackage.pm: Added 0.6 detection
+
 2005-02-27  Dave Morrison  <[EMAIL PROTECTED]>
 
        * Engine.pm: Enable BuildConflicts when running "fink install" (not



-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to