summaryrefslogtreecommitdiffstats
path: root/tools/svnupcheck.pl
diff options
context:
space:
mode:
authorDaniel Stenberg <daniel@haxx.se>2007-03-15 22:31:32 +0000
committerDaniel Stenberg <daniel@haxx.se>2007-03-15 22:31:32 +0000
commit31d5aaeaf168da347236328bf67ff8fe6bec391b (patch)
tree19e65b1f82f42568b4c91374eb2fef20097e3f9a /tools/svnupcheck.pl
parent037958836115986a4694083f3463fa089ac59b33 (diff)
downloadrockbox-31d5aaeaf168da347236328bf67ff8fe6bec391b.tar.gz
rockbox-31d5aaeaf168da347236328bf67ff8fe6bec391b.tar.bz2
rockbox-31d5aaeaf168da347236328bf67ff8fe6bec391b.zip
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
Diffstat (limited to 'tools/svnupcheck.pl')
-rwxr-xr-xtools/svnupcheck.pl15
1 files changed, 15 insertions, 0 deletions
diff --git a/tools/svnupcheck.pl b/tools/svnupcheck.pl
new file mode 100755
index 0000000000..723305bbce
--- /dev/null
+++ b/tools/svnupcheck.pl
@@ -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);