r9701 - /scripts/qa/DebianQA/Classification.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Fri Nov 23 20:27:55 UTC 2007
Author: dmn
Date: Fri Nov 23 20:27:55 2007
New Revision: 9701
URL: http://svn.debian.org/wsvn/?sc=1&rev=9701
Log:
Fix dereferencing undef
Modified:
scripts/qa/DebianQA/Classification.pm
Modified: scripts/qa/DebianQA/Classification.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Classification.pm?rev=9701&op=diff
==============================================================================
--- scripts/qa/DebianQA/Classification.pm (original)
+++ scripts/qa/DebianQA/Classification.pm Fri Nov 23 20:27:55 2007
@@ -111,7 +111,7 @@
if($archive_latest =~ /new|incoming/) {
$status{archive_waiting} = 1;
}
- if(%{$data->{bts}{$pkg}}) {
+ if($data->{bts}{$pkg} and %{$data->{bts}{$pkg}}) {
$status{has_bugs} = 1;
}
my %hilight;
More information about the Pkg-perl-cvs-commits
mailing list