Attachment #57862 for bug #87273

View | Details | Raw Unified | Return to bug 87273
Collapse All | Expand All




	}

	#
	# whole file: COMMENT
	#
	print "OK: checking COMMENT.\n" if ($verbose);
	if ($whole =~ /\nCOMMENT[+?]?=[ \t]+"/) {
		my $lineno = &linenumber($`);
		&perror("WARN: $file [$lineno]: COMMENT messages should not ".
			"be quoted.");
	}

	#
	# whole file: IGNORE
	#
	print "OK: checking IGNORE.\n" if ($verbose);

Return to bug 87273

Lines 1198-1203 Link Here

(-)portlint.pl (+10 lines)
1198	}	1198	}
1199		1199
1200	#	1200	#
		1201	# whole file: COMMENT
		1202	#
		1203	print "OK: checking COMMENT.\n" if ($verbose);
		1204	if ($whole =~ /\nCOMMENT[+?]?=[ \t]+"/) {
		1205	my $lineno = &linenumber($`);
		1206	&perror("WARN: $file [$lineno]: COMMENT messages should not ".
		1207	"be quoted.");
		1208	}
		1209
		1210	#
1201	# whole file: IGNORE	1211	# whole file: IGNORE
1202	#	1212	#
1203	print "OK: checking IGNORE.\n" if ($verbose);	1213	print "OK: checking IGNORE.\n" if ($verbose);