At 12.51 1998.04.03, Josh Gemmell wrote: >I've been busy building some utility modules and I have a question: How do you >prompt for a folder rather than a file? Well, you can use this somewhat-deprecated code: sub get_folder { require 'GUSI.ph'; my($prompt, $default) = @_; MacPerl::Choose( GUSI::AF_FILE(), 0, $prompt, '', GUSI::CHOOSE_DIR() + ($default ? &GUSI::CHOOSE_DEFAULT : 0), $default ); } print get_folder(); It works fine out of the box. You'll need to append a ':' on what it returns, probably. I have not played around enough to know its behavior well. Eventually, there will probably be a direct toolbox call in the toolbox modules. -- 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