scalos/Extras/open_volume.rexx

   1 /*                            Open Volume                      */
   2
   3 addlib('rexxreqtools.library',0,-30)
   4
   5 viewmode=2
   6
   7 Parse Arg name
   8
   9 directory=rtfilerequest(,,'Select Volume To Open',,'rtfi_volumerequest=0',)
  10 If directory ~= "" Then
  11    address command "scalos:tools/opendrawer " directory 'VM=' || viewmode
  12
  13
  14