[Secure-testing-commits] r242 - sarge-checks

Joey Hess joeyh@costa.debian.org
Wed, 05 Jan 2005 11:59:07 +0100


Author: joeyh
Date: 2005-01-05 11:59:07 +0100 (Wed, 05 Jan 2005)
New Revision: 242

Modified:
   sarge-checks/checklist
Log:
remove comments


Modified: sarge-checks/checklist
===================================================================
--- sarge-checks/checklist	2005-01-05 10:55:48 UTC (rev 241)
+++ sarge-checks/checklist	2005-01-05 10:59:07 UTC (rev 242)
@@ -36,10 +36,10 @@
 	while (<IN>) {
 		chomp;
 		if (/^\[/) {
-			($id)=m/((?:DSA|CAN|CVE)-.*?) /;
+			($id)=m/((?:DSA|CAN|CVE)-[^\s]+) /;
 		}
-		elsif (/^(DSA|CAN|CVE)-/) {
-			$id=$_;
+		elsif (/^((?:DSA|CAN|CVE)-[^\s]+)/) {
+			$id=$1;
 		}
 		elsif (/^\s+[!-]\s+(.*?)\s+(.*)$/) {
 			my $package=$1;