From 5645c4afff3bfd3f1a92d01a4d31b25c6e5b9d89 Mon Sep 17 00:00:00 2001
From: rsc <devnull@localhost>
Date: Tue, 11 Jan 2005 19:23:52 +0000
Subject: fun with applescript

---
 bin/page | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 53 insertions(+)
 create mode 100755 bin/page

(limited to 'bin/page')

diff --git a/bin/page b/bin/page
new file mode 100755
index 00000000..28997607
--- /dev/null
+++ b/bin/page
@@ -0,0 +1,53 @@
+#!/bin/sh
+
+preview()
+{
+	list=""
+	pwd=`pwd`
+	for i in "$@"
+	do
+		if [ -n "$list" ]
+		then
+			list="$list, "
+		fi
+		n=`cleanname -d $pwd $i | sed 's!/!:!g'`
+		list="$list\"$n\""
+	done
+	# echo run $list
+	echo 'tell application "Preview"
+		activate
+		open {'"$list"'}
+	end tell' | osascript
+}
+
+case $# in
+0)
+	cat >/var/tmp/page.$$.tmp
+	*="/var/tmp/page.$$.tmp"
+	;;
+*)
+	;;
+esac
+
+case `uname` in
+Darwin)
+	preview "$@"
+	;;
+*)
+	case "`file $1`" in
+	*PDF*)
+		psv $1
+		;;
+	*PS*)
+		psv $1
+		;;
+	*PostScript*)
+		psv $1
+		;;
+	*)
+		qiv "$@"
+		;;
+	esac
+	;;
+esac
+
-- 
cgit v1.2.3