strip //DOC comments during printing

2009-07-12 18:56:00 -07:00 · 2009-07-12 18:56:00 -07:00 · 4ed996f552
parent d42cbd75b2
commit 4ed996f552
1 changed files with 1 additions and 0 deletions
--- a/1
+++ b/1
@ -19,6 +19,7 @@ $linenum = 0;
 foreach (@lines) {
 	$linenum++;
 	chomp;
+	s!//DOC.*!!;
 	s/\s+$//;
 	if(length() >= 75){
 		print STDERR "$file:$linenum: line too long\n";