/[secure-testing]/bin/checklist
ViewVC logotype

Diff of /bin/checklist

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 241 by joeyh, Wed Jan 5 10:55:48 2005 UTC revision 242 by joeyh, Wed Jan 5 10:59:07 2005 UTC
# Line 36  foreach my $list (@ARGV) { Line 36  foreach my $list (@ARGV) {
36          while (<IN>) {          while (<IN>) {
37                  chomp;                  chomp;
38                  if (/^\[/) {                  if (/^\[/) {
39                          ($id)=m/((?:DSA|CAN|CVE)-.*?) /;                          ($id)=m/((?:DSA|CAN|CVE)-[^\s]+) /;
40                  }                  }
41                  elsif (/^(DSA|CAN|CVE)-/) {                  elsif (/^((?:DSA|CAN|CVE)-[^\s]+)/) {
42                          $id=$_;                          $id=$1;
43                  }                  }
44                  elsif (/^\s+[!-]\s+(.*?)\s+(.*)$/) {                  elsif (/^\s+[!-]\s+(.*?)\s+(.*)$/) {
45                          my $package=$1;                          my $package=$1;
Legend:
Removed from v.241  
changed lines
  Added in v.242
  ViewVC Help
Powered by ViewVC 1.1.5