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/web | 71 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----
 1 file changed, 67 insertions(+), 4 deletions(-)

(limited to 'bin/web')

diff --git a/bin/web b/bin/web
index 1745df50..0aafb76a 100755
--- a/bin/web
+++ b/bin/web
@@ -1,8 +1,58 @@
 #!/bin/sh
 
-plumb1()
+plumbfirefox()
+{
+	echo '
+		tell application "Firefox"
+		activate
+		tell application "System Events"
+		tell process "firefox"
+		keystroke "t" using {command down}
+		end tell
+		end tell
+		Get URL "'$1'"
+		end tell
+	' | osascript
+}
+
+plumbsafari()
+{
+	echo '
+		tell application "Safari"
+		activate
+		tell application "System Events"
+		tell process "safari"
+		keystroke "t" using {command down}
+		end tell
+		end tell
+		open location "'$1'"
+		end tell
+	' | osascript
+}
+
+plumbapple()
 {
-	case x-$BROWSER in
+	case ${BROWSER:-none} in
+	firefox)
+		plumbfirefox "$@"
+		;;
+	safari)
+		plumbsafari "$@"
+		;;
+	none)
+		if [ -d /Applications/Firefox.app ]
+		then
+			plumbfirefox "$@"
+		else
+			plumbsafari "$@"
+		fi
+		;;
+	esac
+}
+
+plumbunix()
+{
+	case ${BROWSER:-firefox} in
 	# Other browsers here
 	# ...
 	*opera*)
@@ -15,8 +65,8 @@ plumb1()
 		$BROWSER -remote 'openURL('$i',new-tab)'
 		;;
 	x-)
-		# run firefox as default!
-		firefox -remote 'openURL('$i',new-tab)'
+		BROWSER=firefox
+		$BROWSER -remote 'openURL('$i',new-tab)'
 		;;
 	*mozilla*)
 		$BROWSER -remote 'openURL('$i',new-tab)'
@@ -27,6 +77,19 @@ plumb1()
 	esac
 }
 
+plumb1()
+{
+	case `uname` in
+	Darwin)
+		plumbapple "$@"
+		;;
+	*)
+		plumbunix "$@"
+		;;
+	esac
+}
+
+
 if [ $# = 0 ]
 then
 	plumb1 about:blank
-- 
cgit v1.2.3