Refactoring: Factor out run-repos and run-workdirs

[git-scripts.git] / run-repos

diff --git a/run-repos b/run-repos
new file mode 100755 (executable)
index 0000000..c38b923
--- /dev/null
+++ b/run-repos
@@ -0,0 +1,17 @@
+#! /bin/sh
+
+cd "`dirname \"$0\"`" &&
+prog_dir="`pwd`" &&
+export prog_dir
+
+if [ "$1" = "-v" ]; then
+   verbose=1
+   shift
+fi
+
+cat "$prog_dir"/locate-all.list |
+while read d; do
+   if ! test -d "$d"; then echo "No such dir: $d" >&2; continue; fi
+   if [ "$verbose" = 1 ]; then echo "$d"; fi
+   cd "$d" && "$@" < /dev/tty || exit 1
+done