Author: ranger
Date: Sat May 20 11:40:31 2006
New Revision: 45

URL: 
<http://svn.finkproject.org/websvn/listing.php?sc=1&rev=45&repname=user%3a+ranger>
Log:
md5deep

Modified:
    trunk/experimental/common/main/finkinfo/kde/generate-i18n.pl

Modified: trunk/experimental/common/main/finkinfo/kde/generate-i18n.pl
URL: 
<http://svn.finkproject.org/websvn/diff.php?path=/trunk/experimental/common/main/finkinfo/kde/generate-i18n.pl&rev=45&repname=user%3a+ranger>
==============================================================================
--- trunk/experimental/common/main/finkinfo/kde/generate-i18n.pl (original)
+++ trunk/experimental/common/main/finkinfo/kde/generate-i18n.pl Sat May 20 
11:40:31 2006
@@ -95,8 +95,7 @@
 for my $i18n (@KOI18N) {
        my ($shortname) = $i18n =~ 
/koffice-l10n-([^\-]+)-${KOVERSION}.*.tar.(gz|bz2)/;
        if (exists $MAPPINGS{$shortname}) {
-               chomp(my $md5 = `md5 /sw/src/$i18n`);
-               $md5 =~ s/^.*\s*=\s*//;
+               my ($md5) = `md5deep /sw/src/$i18n` =~ /^\s*(\S+)\s+/;
                my $normalized = lc($MAPPINGS{$shortname});
                $normalized =~ s#[^a-zA-Z]+#-#g;
                $normalized =~ s#-*$##;



_______________________________________________
Fink-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to