Thomas Wegner schrieb:
> At 21:03 Uhr +0200 27.06.2002, Dr. Ing. Manfred Mall wrote:
>> Hallo everybody,
>>
>> I am an oldy using PERL for my paperwork and maintaining my Web-Site.
>> Up to now I used 5.2 and changed recently to 5.6.
>> Under 5.2 I used
>> StandardFile'GetFolder called in by require "StandardFile.pl" to get a
>> folder.
>> This was easy to use, but the module is no longer in the 5.6 distribution
>> and I am in difficulties to replace the old function in my stuff with the
>> new one.
>>
>> Im am not able to find a replacement in the 5.6 distribution and I am not
>> that good to dig down through the toolbox. I also miss "choose" and "GUSI".
>>
>> Can anybody help ?
>>
>> Thanks
>>
>> --
>> Dr. Ing. Manfred Mall
>> Löhlestr. 7
>> 88690 Uhldingen-Mühlhofen
>> Phone: +49 7556 6123
>> Fax: +49 7556 966822
>> www.dr-mall-uhldingen.de
>> www.kunst-in-uhldingen.de
>
>
> Choose has been dropped in MacPerl 5.6.1, because GUSI 2, the POSIX
> library for Mac OS, no longer offers the C equivalent of this
> function. Hence, there's no way (I'm aware of) for choosing a folder
> with StandardFile (correct me if I'm wrong). You might want to use
> Mac::Navigation instead. This little script
>
> #! perl -w
> use Mac::Navigation;
>
> $options = NavGetDefaultDialogOptions();
> $options->message("What's up, Doc?");
> $reply = NavChooseObject("", $options, undef, sub {1}) or die $^E;
>
> for ($i = 0; $i++<$reply->count; ) {
> print $reply->file($i), "\n";
> }
>
> __END__
>
> (copied from the ChooseObjects.t test/example script) should do what you want.
>
> HTH.
>
>
> --Thomas
Many thanks for that quick help. It works and I now have some understanding
of the functions of Mac::Navigation, but some more ducumentation would be
very fine. This package has to be used often, even by beginners.
Yours
Manfred
