From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Sun, 9 Dec 2007 23:51:07 +0000 (+0100)
Subject: Packages::DoShow: Fix a "uninitialized value" warning
X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=commitdiff_plain;h=1a21b74ad9ccf9572750caaed6d5e22cd395fa47;ds=sidebyside

Packages::DoShow: Fix a "uninitialized value" warning

$desc_md5 might be undefined if we handle a virtual package.
---

diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm
index 1d41c3a..0159065 100644
--- a/lib/Packages/DoShow.pm
+++ b/lib/Packages/DoShow.pm
@@ -442,7 +442,7 @@ sub build_deps {
 	    my $entry = $entries{$p_name} ||
 		read_entry_simple( $packages, $p_name, $opts->{h_archives}, $suite);
 	    my $short_desc = $entry->[-1];
-	    my $desc_md5 = $entry->[-2];
+	    my $desc_md5 = $entry->[-2] || '';
 	    my $arch = $entry->[3];
 	    my $archive = $entry->[1];
 	    my $p_suite = $entry->[2];