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

[MacPerl] list of volumes (was UnmountVol)



Thanks to those who submitted applescript solutions to the UnmountVol
problem (and, in advance, to Matthias for adding the toolbox call to the
next release of MacPerl).

Now I need a way to locate the (audio) CD that I want to unmount and eject.

(1) If I could obtain a list of noames of mounted volumes (or a list of
everything which shows up on the desktop, including the mounted volumes),
I'd be happy to search for the volume name via /^Audio CD [0-9]+$/, and
then plug into the above mentioned applescript methods.  But I can't figure
out how obtain such a list.  Is there a magic pathname I can plug into
opendir/readdir?

(2) I already have (from another source) the vRefNum for the CD I want to
unmount.  Is there a way to modify

  $alias = NewAliasMinimal("theVolume:");
  $evt = AEBuildAppleEvent('fndr', 'ptwy', 'sign', 'MACS', 0, 0,
  "'----':alis(\@\@)", $alias) or die $^E;

so that it works with a vRefNum instead of the name of the volume?




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