[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] app glue alpha online



At 14.27 -0400 1998.09.18, Thomas R. Kimpton wrote:
>If AppleScript users are accustomed to having to start an application
>before they can use it, something's wrong: you don't have to launch
>the application before running an AppleScript against it.  The
>"tell application" will launch the app before trying to send the
>AppleEvent(s).  If you give it the full path to the application,
>it won't even ask you where it is:
>
>tell application "Dev:Development:MPW:MPW Shell"
>	DoScript "Open -n Temp:Temp:GooberDude2"
>end tell

Yes.  And speaking of which, I need to make Mac::Apps::Launch accept a
filespec to an app for the cases where the app might be installed more than
once on a given machine (like two versions of Anarchie or CodeWarrior), and
then make this available through the Glue modules, too.

Anyway, even if AppleScript and Frontier did not automatically open the
app, there is no reason I can see why the MacPerl glue shouldn't.  Opening
a pipe to sendmail was presented as an example; well, if you use MailTools,
you never explicitly open anything.  You create your mail, and then send it
with a method call.  That seems to me to be the Perl way.

So I will, I think, launch the app if it is not running, but I am not
opposed to offering a launch() method so it can be launched explicitly.  I
do, however, need to come up with a naming convention for the methods
offered by Mac::Glue, so they cannot possibly conflict with an event name
given by an application.  A leading underscore might be a simple answer,
but that is not exactly right: leading underscores are for private
functions/methods, and these are public.
That is why I also thought ae_ or glue_ to start the method name might make
sense.  Or I could make sure all event names are lowercase, and make these
methods UpCase, like in Mac::Apps::Launch itself.

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch