mac term packaging code (trunk only)
: Modified Files: : sys/unix/hints/macosx.sh sys/unix/hints/macosx10.5 : win/macosx/NetHackRecover.applescript win/macosx/recover.pl : Added Files: : win/macosx/NetHackGuidebook.applescript : win/macosx/NetHackTerm.applescript
This commit is contained in:
@@ -15,10 +15,11 @@ if not canceled then
|
||||
set hpath to the path to me
|
||||
set mpath to the POSIX path of hpath
|
||||
considering case
|
||||
set lastpos to offset of "/nethackdir" in mpath
|
||||
set lastpos to lastpos + (length of "/nethackdir")
|
||||
set rawpath to (get text 1 through lastpos of mpath) & "/recover.pl"
|
||||
set safepath to the quoted form of rawpath
|
||||
--set lastpos to offset of "/nethackdir" in mpath
|
||||
--set lastpos to lastpos + (length of "/nethackdir")
|
||||
--set rawpath to (get text 1 through lastpos of mpath) & "/recover.pl"
|
||||
--set safepath to the quoted form of rawpath
|
||||
set safepath to the quoted form of "/usr/games/lib/nethackdir/recover.pl"
|
||||
end considering
|
||||
do shell script safepath
|
||||
display dialog result with title "NetHackRecover Output"
|
||||
|
||||
Reference in New Issue
Block a user