[Mac OS X TeX] Re: emacs 21.1
Enrico Franconi
franconi at cs.man.ac.uk
Sat Feb 23 10:22:23 CET 2002
On February 22, Joshua S. Hodas writes:
> Could you post the code of the core of this script (the part that
> handles the drag and drop) in the meantime? I'd just like to see how
> the unix/applescript integration is handled in a simple code
> example. That will be enough to get me started.
--- This makes use of the 'OSX PowerAddOns Lite.osax' scripting addition
on open names
set file_list to ""
repeat with filename in names
set file_list to file_list & "\"" & convert_filepath(filename) & "\" "
end repeat
try
Shell "tcsh -c '/Applications/Emacs.app/Contents/MacOS/Emacs -l ~/.emacs-21-dist " & file_list & " &';kill -9 " & (Get My PID)
on error
quit
end try
end open
on run
try
Shell "tcsh -c '/Applications/Emacs.app/Contents/MacOS/Emacs -l ~/.emacs-21-dist &';kill -9 " & (Get My PID)
on error
quit
end try
end run
on convert_filepath(this_filepath)
set this_filepath to this_filepath as string
set AppleScript's text item delimiters to ":"
set the path_segments to every text item of this_filepath
set AppleScript's text item delimiters to "/"
set this_filepath to "/" & (the path_segments as string)
set AppleScript's text item delimiters to ""
return this_filepath
end convert_filepath
--
Enrico Franconi - franconi at cs.man.ac.uk
University of Manchester - http://www.cs.man.ac.uk/~franconi/
Department of Computer Science - Phone: +44 (161) 275 6170
Manchester M13 9PL, UK - Fax: +44 (161) 275 6204
-----------------------------------------------------------------
To UNSUBSCRIBE, send email to <info at email.esm.psu.edu> with
"unsubscribe macosx-tex" (no quotes) in the body.
For additional HELP, send email to <info at email.esm.psu.edu> with
"help" (no quotes) in the body.
This list is not moderated, and I am not responsible for
messages posted by third parties.
-----------------------------------------------------------------
More information about the macostex-archives
mailing list