pass the output from 'svn update' to this script, and it will say rebuild if
a distributed rebuild would be justified git-svn-id: svn://svn.rockbox.org/rockbox/trunk@12790 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
parent
0379588361
commit
31d5aaeaf1
1 changed files with 15 additions and 0 deletions
15
tools/svnupcheck.pl
Executable file
15
tools/svnupcheck.pl
Executable file
|
@ -0,0 +1,15 @@
|
|||
#!/usr/bin/perl
|
||||
|
||||
# feed this script the output from svn update and it will tell if a rebuild
|
||||
# is needed/wanted
|
||||
my $change;
|
||||
while(<STDIN>) {
|
||||
if(/^([A-Z]+) *(.*)/) {
|
||||
my ($w, $path) = ($1, $2);
|
||||
if($path !~ /^(rbutil|manual)/) {
|
||||
$change++;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
print "rebuild!\n" if($change);
|
Loading…
Reference in a new issue