X-Git-Url: http://git.ozo.com/?a=blobdiff_plain;f=scripts%2Fconfigtest.pl;h=476bba7dcec12623839cc36901ba54a5cbc80cd5;hb=8b58b43391b17c924d98b21775ecd0d67922b001;hp=01323a521111a943cfc8e9c5f94a45f1632a2144;hpb=f77b88d124ea1c900f9cf5e04046939aad48bbe1;p=openwrt-10.03%2F.git

diff --git a/scripts/configtest.pl b/scripts/configtest.pl
index 01323a521..476bba7dc 100755
--- a/scripts/configtest.pl
+++ b/scripts/configtest.pl
@@ -1,12 +1,28 @@
 #!/usr/bin/perl
-
 my %change = (
-	'BUSYBOX' => 'make -C package busybox-clean',
+	'^BUSYBOX' => 'make package/busybox-clean',
+	'OPENVPN_' => 'make package/openvpn-clean',
+	'SYSCONF_' => 'make package/base-files-clean target_clean',
 	'' => 'make target_clean'
 );
 
+my @configfiles = (
+#	['package/linux/linux.config', 'build_mipsel/linux/.config' =>
+#		'make -C package linux-clean']
+);
+
+
+
 foreach my $change (keys %change) {
 	my $v1 = `grep '$change' .config.test`;
 	my $v2 = `grep '$change' .config`;
 	$v1 eq $v2 or system($change{$change});
 }
+
+foreach my $file (@configfiles) {
+	if ((-f $file->[0]) and (-f $file->[1])) {
+		my @s1 = stat $file->[0];
+		my @s2 = stat $file->[1];
+		$s1[9] > $s2[9] and system($file->[2]);
+	}
+}