openwrtv3/openwrt/scripts/configtest.pl

12 lines
227 B
Perl
Raw Normal View History

#!/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});
}