[dak/master] debianqueued: construct Digest::MD5 object before trying to use it

[Ansgar Burchardt <ansgar@debian.org>]

---
 tools/debianqueued-0.9/debianqueued |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index 4c77e2a..0ead31c 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;
-- 
1.7.2.5