chiark / gitweb /
view-cyclicly script - has bug in generation of .alternately filename
authorIan Jackson <ian@davenant.relativity.greenend.org.uk>
Wed, 8 Oct 2008 23:31:05 +0000 (00:31 +0100)
committerIan Jackson <ian@davenant.relativity.greenend.org.uk>
Wed, 8 Oct 2008 23:31:05 +0000 (00:31 +0100)
view-cyclicly [new file with mode: 0755]

diff --git a/view-cyclicly b/view-cyclicly
new file mode 100755 (executable)
index 0000000..34e7087
--- /dev/null
@@ -0,0 +1,23 @@
+#!/bin/sh
+set -e
+if [ $# -lt 3 ]; then
+ echo >&2 'usage: view-cyclicly ./view-NN file-NN-a.cfm file-NN-b.cfm...'
+ exit 1
+fi
+
+viewer=$1; shift
+
+alt=".alternately"
+for f in "$@"; do
+       g="${g//_/__}"
+       g="${g//"/"/_:}"
+       alt="${alt}_,$g"
+done
+
+ln -sf -- "$1" "$alt"
+"$viewer" "$alt" &
+
+while sleep 1.0; do
+       justhad="$1"; shift; set -- "$@" "$justhad"
+       ln -sf -- "$1" "$alt"
+done