View | Details | Raw Unified | Return to bug 243600 | Differences between
and this patch

Collapse All | Expand All

(-)ports-mgmt/portlint/src/portlint.pl (+22 lines)
Lines 307-312 foreach my $i (@checker) { Link Here
307
	}
307
	}
308
}
308
}
309
309
310
checkpatches(<$makevar{FILESDIR}/patch-*>);
311
310
if ($committer) {
312
if ($committer) {
311
	sub find_proc {
313
	sub find_proc {
312
		return if /^\.\.?$/;
314
		return if /^\.\.?$/;
Lines 1035-1040 sub checklastline { Link Here
1035
	close(IN);
1037
	close(IN);
1036
}
1038
}
1037
1039
1040
sub checkpatches {
1041
	my (@patchfiles) = @_;
1042
	my @patched_files;
1043
	foreach my $file (@patchfiles) {
1044
		open(IN, "< $file") || return 0;
1045
		while (<IN>) {
1046
			if ($_ =~ /^\+\+\+\s(.*?)\s.*/) {
1047
				#if($1 ~~ @patched_files) {
1048
				if (grep {$_ eq $1} @patched_files) {
1049
					&perror("WARN", $file, -1, "$1 patched multiple times");
1050
				}
1051
				else {
1052
					push(@patched_files, $1);
1053
				}
1054
1055
			}
1056
		}
1057
	}
1058
}
1059
1038
sub checkpatch {
1060
sub checkpatch {
1039
	my($file) = @_;
1061
	my($file) = @_;
1040
	my($whole);
1062
	my($whole);

Return to bug 243600