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

Modified Files:
        SHA1.pm 
Log Message:
Checksum/SHA1.pm: Fix bug in matching of SHA1 line if Digest::<foo> 
isn't available (e.g. on 10.3). Fix proposed by AIDA Shinra on 
the fink-devel mailing list on 2006-06-24. Also noted by costabel
and dmalloc.


Index: SHA1.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Checksum/SHA1.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- SHA1.pm     18 Mar 2006 21:24:40 -0000      1.4
+++ SHA1.pm     18 Sep 2006 20:43:55 -0000      1.5
@@ -54,7 +54,7 @@
                        $sha1cmd = "$basepath/bin/sha1deep";
                } elsif (-x "/usr/bin/openssl") {
                        $sha1cmd = '/usr/bin/openssl sha1';
-                       $match   = /SHA1\([^\)]+\)\s*=\s*(\S+)/
+                       $match   = 'SHA1\([^\)]+\)\s*=\s*(\S+)';
                } elsif (-e "$basepath/bin/sha1sum") {
                        $sha1cmd = "$basepath/bin/sha1sum";
                }


-------------------------------------------------------------------------
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