Re: [MacPerl] UnmountVol?

[pudge@pobox.com (Chris Nandor)]

At 04.22 1998.02.11, Alan Fry wrote:
>Somewhat simpler is...
>
>#!perl
>use Mac::AppleEvents;
>use Mac::Files;
>
>$alias = NewAliasMinimal("theVolume:");
>
>$evt = AEBuildAppleEvent('fndr', 'ptwy', 'sign', 'MACS', 0, 0,
>"'----':alis(\@\@)", $alias) or die $^E;
>
>$rep = AESend($evt, kAEWaitReply) or die $^E;
>
>AEDisposeDesc $evt;
>AEDisposeDesc $rep;
>
>...but are there any drawbacks with this I wonder?

Probably not!

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10  1FF7 7F13 8180 B6B6'])
#==               New Book:  MacPerl: Power and Ease               ==#
#==    Publishing Date: Early 1998. http://www.ptf.com/macperl/    ==#



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