diff --git a/bin/backup_home b/bin/backup_home
index 52549ad..4356527 100755
--- a/bin/backup_home
+++ b/bin/backup_home
@@ -2,12 +2,17 @@
HOSTS="bim twice reed oaa os pfem vulon beetle proton pfem"
+PATHS="$@"
+if [ "x$PATHS" = "x" ]; then
+ PATHS="Documents c common-lisp config erlang kmx.io ports ruby txt"
+fi
+
run () {
echo "$@"
"$@"
}
cd
-for H in $HOSTS; do
- run rsync -a Documents c common-lisp config erlang kmx.io ports ruby txt "$H":
+for HOST in $HOSTS; do
+ run rsync -a "$PATHS" "$HOST":
done
diff --git a/bin/backup_home_ b/bin/backup_home_
new file mode 100644
index 0000000..946e2ff
--- /dev/null
+++ b/bin/backup_home_
@@ -0,0 +1,18 @@
+#!/bin/sh
+
+HOSTS="bim twice reed oaa os pfem vulon beetle proton pfem"
+
+PATHS="$@"
+if [ "x$PATHS" = "x" ]; then
+ PATHS="Documents c common-lisp config erlang kmx.io ports ruby txt"
+fi
+
+run () {
+ echo "$@"
+ "$@"
+}
+
+cd
+for HOST in $HOSTS; do
+ run rsync -a "$PATHS" root@"$HOST":
+done