From: Ansgar Burchardt Date: Thu, 6 Dec 2012 11:32:30 +0000 (+0100) Subject: debianqueued: construct Digest::MD5 object before trying to use it X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b20b1d58b688bebb896144c6a4c10ed7fb37fe2b;p=dak debianqueued: construct Digest::MD5 object before trying to use it --- 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;