buildframework/helium/tools/publish/evalidmd5.patch
author raptorbot
Mon, 26 Apr 2010 09:44:21 +0100
changeset 442 a0f5dc257779
parent 1 be27ed110b50
permissions -rw-r--r--
Remove redundant head.

--- oldevalidmd5.pm	Mon Mar 12 13:49:20 2007
+++ evalidmd5.pm	Fri Aug 10 10:29:34 2007
@@ -223,7 +223,7 @@
     open LIST, "$iListFile" or croak "Cannot open $iListFile\n";
     while(<LIST>)
     {
-      my $iFileName = $iDir."/".$_;
+      chomp(my $iFileName = $iDir."/".$_);
       if(-e $iFileName)
       {
         # The listed file exists add to the @iFileList