openwrt/scripts/configtest.pl


1
2
3
4
5
6
7
8
9
10
11

#!/usr/bin/perl

my %change = (
	'ROOTFS' => 'make linux-dirclean'
);

foreach my $change (keys %change) {
	my $v1 = `grep '$change' .config.test`;
	my $v2 = `grep '$change' .config`;
	$v1 eq $v2 or system($change{$change});
}