Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: using Tk::FileSelect

by strider corinth (Friar)
on Nov 05, 2002 at 16:22 UTC ( #210495=note: print w/replies, xml ) Need Help??

in reply to using Tk::FileSelect

The problem looks like it stems from the way Tk::FileSelect handles file masks, and its selection verifying feature. You aren't allowed (by default) to pick directories, just files. So when you select /usr/local/*, you're seeing odd results because you're not selecting the directory itself, but all of the files within it.

If you add $fs->configure( -verify => [ '-e' ] ); after you create your selection dialog, it will switch the verification flag from '!-d' (don't select directories) to '-e' (select anything that exists). My test program returns just the directory name when that line is inserted.

For more info, check the CPAN docs for Tk::FileSelect.

Love justice; desire mercy.

Replies are listed 'Best First'.
Re: Re: using Tk::FileSelect
by wmoran (Initiate) on Nov 05, 2002 at 16:49 UTC
    That does it, thanks for the reply.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://210495]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (12)
As of 2016-10-27 15:28 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (365 votes). Check out past polls.