Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22381
Modified Files:
ChangeLog Checksum.pm
Log Message:
Don't crash if MD5 doesn't match and we don't have all the
Checksum/*.pm back-end executables.
Index: Checksum.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Checksum.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- Checksum.pm 18 Oct 2005 02:45:11 -0000 1.5
+++ Checksum.pm 24 Oct 2005 19:30:11 -0000 1.6
@@ -151,8 +151,10 @@
foreach my $algorithm ( find_subpackages($class) ) {
$algorithm =~ s/${class}:://;
- my $plugin = Fink::Checksum->new($algorithm);
- $checksums{$algorithm} = $plugin->get_checksum($filename) if
defined $plugin;
+ eval {
+ my $plugin = Fink::Checksum->new($algorithm);
+ $checksums{$algorithm} =
$plugin->get_checksum($filename) if defined $plugin;
+ };
}
return \%checksums;
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1175
retrieving revision 1.1176
diff -u -d -r1.1175 -r1.1176
--- ChangeLog 21 Oct 2005 19:27:54 -0000 1.1175
+++ ChangeLog 24 Oct 2005 19:30:11 -0000 1.1176
@@ -1,3 +1,8 @@
+2005-10-24 Daniel Macks <[EMAIL PROTECTED]>
+
+ * Checksum.pm: get_all_checksums: don't crash if a back-end isn't
+ implemented.
+
2005-10-21 Daniel Macks <[EMAIL PROTECTED]>
* Engine.pm: Remember Fink::PkgVersion->dpkg_changed when calling
-------------------------------------------------------
This SF.Net email is sponsored by the JBoss Inc.
Get Certified Today * Register for a JBoss Training Course
Free Certification Exam for All Training Attendees Through End of 2005
Visit http://www.jboss.com/services/certification for more information
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits
