Author: joeyh Date: 2005-10-20 04:58:38 +0000 (Thu, 20 Oct 2005) New Revision: 2471 Modified: bin/bts-update Log: fix a bug in processing of multiple bugs in one line Modified: bin/bts-update ==================================================================--- bin/bts-update 2005-10-20 02:20:16 UTC (rev 2470) +++ bin/bts-update 2005-10-20 04:58:38 UTC (rev 2471) @@ -75,7 +75,11 @@ elsif (/\s+-\s+.*\((.*)\)/) { my @notes=split(/\s*;\s+/, $1); foreach my $note (@notes) { - if (/bug #(\d+)/) { + if ($note =~ /bug #(\d+)/) { + if (! defined $cve) { + print STDERR "no cve for bug at line $.!\n"; + next; + } $ret{$1}{$cve}=1; } }