Author: joeyh
Date: 2005-09-01 20:04:41 +0000 (Thu, 01 Sep 2005)
New Revision: 1770
Modified:
bin/checklist
Log:
work around further warnings for recording stuff with no item ids
Modified: bin/checklist
==================================================================---
bin/checklist 2005-09-01 19:58:54 UTC (rev 1769)
+++ bin/checklist 2005-09-01 20:04:41 UTC (rev 1770)
@@ -75,12 +75,15 @@
# Add an item into the data array.
sub record {
my ($package, $condition, $item, $urgency)=@_;
+
+ if (! defined $item) {
+ $item='''';
+ }
if ($html) {
$condition=~s{bug #(\d+)}{<a
href="http://bugs.debian.org/$1">bug #$1</a>}g;
$condition=~s{unfixed}{<b>unfixed</b>}g;
- $item=~s#((?:CAN|CVE)-\d+-\d+)#<a
href="http://www.cve.mitre.org/cgi-bin/cvename.cgi?name=$1">$1</a>#g
- if defined $item;
+ $item=~s#((?:CAN|CVE)-\d+-\d+)#<a
href="http://www.cve.mitre.org/cgi-bin/cvename.cgi?name=$1">$1</a>#g;
}
push @{$data{$package}{$condition}}, {item => $item, urgency =>
$urgency};