X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=tools%2Fdebianqueued-0.9%2Fdebianqueued;fp=tools%2Fdebianqueued-0.9%2Fdebianqueued;h=0ead31ccc7049683dba0c95719b4b1722438f5a3;hb=b20b1d58b688bebb896144c6a4c10ed7fb37fe2b;hp=4c77e2af0e52f9ebd043c50ea434fa36d7baaf44;hpb=9bbcad51a6bc29e1e2387bede844f3e937295225;p=dak.git

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index 4c77e2af..0ead31cc 100755
--- a/tools/debianqueued-0.9/debianqueued
+++ b/tools/debianqueued-0.9/debianqueued
@@ -2134,9 +2134,10 @@ sub rm(@) {
 #
 sub md5sum($) {
   my $file = shift;
+  my $md5 = Digest::MD5->new;
 
   open my $fh, "<", $file or return "";
-  my $md5 = $md5->addfile($fh);
+  $md5->addfile($fh);
   close $fh;
 
   return $md5->hexdigest;