RepoMirrors/openwrt
1
0
Fork 0
mirror of git://git.openwrt.org/openwrt/openwrt.git synced 2024-12-23 23:23:31 +00:00
Code Issues Packages Projects Releases Wiki Activity

remove obsolete file

Browse Source 
SVN-Revision: 5251
This commit is contained in:
Felix Fietkau 2006-10-20 13:36:00 +00:00
parent dbd8cee5e7
commit f931548438
1 changed files with 0 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
scripts/configtest.pl
View File

@ -1,35 +0,0 @@
#!/usr/bin/perl
#
# Copyright (C) 2006 OpenWrt.org
#
# This is free software, licensed under the GNU General Public License v2.
# See /LICENSE for more information.
#
my %change = (
'^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]);
}
}