45 lines
1.1 KiB
Bash
45 lines
1.1 KiB
Bash
|
# Open folder in ForkLift.app from console
|
||
|
|
# Author: Adam Strzelecki nanoant.com, modified by Bodo Tasche bitboxer.de
|
||
|
|
#
|
||
|
|
# Usage:
|
||
|
|
# fl [<folder>]
|
||
|
|
#
|
||
|
|
# Opens specified directory or current working directory in ForkLift.app
|
||
|
|
#
|
||
|
|
# Notes:
|
||
|
|
# It assumes Shift+Cmd+G launches go to folder panel and Cmd+N opens new
|
||
|
|
# app window.
|
||
|
|
#
|
||
|
|
# https://gist.github.com/3313481
|
||
|
|
function fl {
|
||
|
|
if [ ! -z "$1" ]; then
|
||
|
|
DIR=$1
|
||
|
|
if [ ! -d "$DIR" ]; then
|
||
|
|
DIR=$(dirname $DIR)
|
||
|
|
fi
|
||
|
|
if [ "$DIR" != "." ]; then
|
||
|
|
PWD=`cd "$DIR";pwd`
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
osascript 2>&1 1>/dev/null <<END
|
||
|
|
tell application "ForkLift"
|
||
|
|
activate
|
||
|
|
end tell
|
||
|
|
tell application "System Events"
|
||
|
|
tell application process "ForkLift"
|
||
|
|
try
|
||
|
|
set topWindow to window 1
|
||
|
|
on error
|
||
|
|
keystroke "n" using command down
|
||
|
|
set topWindow to window 1
|
||
|
|
end try
|
||
|
|
keystroke "g" using {command down, shift down}
|
||
|
|
tell sheet 1 of topWindow
|
||
|
|
set value of text field 1 to "$PWD"
|
||
|
|
keystroke return
|
||
|
|
end tell
|
||
|
|
end tell
|
||
|
|
end tell
|
||
|
|
END
|
||
|
|
}
|