Add support for ForkLift 3
This adds support for ForkLift 3, which uses a different application id and also uses a popover instead of a sheet for entering the directory to go to. This also improves the handling of different versions of ForkLift, by first choosing any currently running instance, and if none is running starting the newest available version.
This commit is contained in:
parent
a7fb55cf13
commit
6c17dd8daa
@ -1,6 +1,6 @@
|
||||
# Open folder in ForkLift.app or ForkLift2.app from console
|
||||
# Author: Adam Strzelecki nanoant.com, modified by Bodo Tasche bitboxer.de
|
||||
# Updated to support ForkLift2 by Johan Kaving
|
||||
# Updated to support ForkLift 2 and ForkLift 3 by Johan Kaving
|
||||
#
|
||||
# Usage:
|
||||
# fl [<folder>]
|
||||
@ -26,21 +26,53 @@ function fl {
|
||||
|
||||
try
|
||||
tell application "Finder"
|
||||
set appName to name of application file id "com.binarynights.ForkLift2"
|
||||
set forkLift3 to name of application file id "com.binarynights.ForkLift-3"
|
||||
end tell
|
||||
on error err_msg number err_num
|
||||
set forkLift3 to null
|
||||
end try
|
||||
try
|
||||
tell application "Finder"
|
||||
set appName to name of application file id "com.binarynights.ForkLift"
|
||||
set forkLift2 to name of application file id "com.binarynights.ForkLift2"
|
||||
end tell
|
||||
on error err_msg number err_num
|
||||
set forkLift2 to null
|
||||
end try
|
||||
try
|
||||
tell application "Finder"
|
||||
set forkLift to name of application file id "com.binarynights.ForkLift"
|
||||
end tell
|
||||
on error err_msg number err_num
|
||||
set forkLift to null
|
||||
end try
|
||||
|
||||
if application appName is running
|
||||
tell application appName
|
||||
if forkLift3 is not null and application forkLift3 is running then
|
||||
tell application forkLift3
|
||||
activate
|
||||
set forkLiftVersion to version
|
||||
end tell
|
||||
else if forkLift2 is not null and application forkLift2 is running then
|
||||
tell application forkLift2
|
||||
activate
|
||||
set forkLiftVersion to version
|
||||
end tell
|
||||
else if forkLift is not null and application forkLift is running then
|
||||
tell application forkLift
|
||||
activate
|
||||
set forkLiftVersion to version
|
||||
end tell
|
||||
else
|
||||
if forkLift3 is not null then
|
||||
set appName to forkLift3
|
||||
else if forkLift2 is not null then
|
||||
set appName to forkLift2
|
||||
else if forkLift is not null then
|
||||
set appName to forkLift
|
||||
end if
|
||||
|
||||
tell application appName
|
||||
activate
|
||||
set forkLiftVersion to version
|
||||
end tell
|
||||
repeat until application appName is running
|
||||
delay 1
|
||||
@ -59,10 +91,16 @@ function fl {
|
||||
set topWindow to window 1
|
||||
end try
|
||||
keystroke "g" using {command down, shift down}
|
||||
if forkLiftVersion starts with "3" then
|
||||
tell pop over of list of group of splitter group of splitter group of topWindow
|
||||
set value of text field 1 to "$PWD"
|
||||
end tell
|
||||
else
|
||||
tell sheet 1 of topWindow
|
||||
set value of text field 1 to "$PWD"
|
||||
keystroke return
|
||||
end tell
|
||||
end if
|
||||
keystroke return
|
||||
end tell
|
||||
end tell
|
||||
END
|
||||
|
Loading…
Reference in New Issue
Block a user