|o||Rewrote Tk stuff to take advantage of new Compound widget module, so FileSelect is now composed of 2 LabEntry and 2 ScrlListbox2 subwidgets.|
|o||Moved entry labels (from to the left of) to above the entry fields.|
Caller is now able to control these aspects of widget, in both
FileSelect (new) and configure :
(Please see subroutine Populate for details, as these options change rapidly!)
|o||I changed from Double-Button-1 to Button-1 in the Files listbox, to work with multiple mode in addition to browse mode. I also made some name changes (LastPath --> saved_path, ...).|
|o||The show method is not yet updated.|
|o||The topLevel stuff is not done yet. I took it out while I toy with the idea of FileSelect as a subwidget. Then the normal topLevel thing with Buttons along the bottom could be build on top of it.|
|o||By request of Henry Katz <email@example.com>, I added the functionality of using the Directory entry as a filter. So, if you want to only see the *.c files, you add a .c (the *s already there :) and hit return.|
Allow either file or directory names to be accepted.
o Require double click to move into a new directory rather than a single click. This allows a single click to select a directory name so it can be accepted. o Add -verify list option so that standard Perl file test operators (like -d and -x) can be specified for further name validation. The default value is the special value !-d (not a directory), so any name can be selected as long as its not a directory - after all, this IS FileSelect!
$fs->configure(-verify => [-d, [\&verify_code, $P1, $P2, ... $Pn]]);
ensures that the selected name is a directory. Further, if an element of the list is an array reference, the first element is a code reference to a subroutine and the remaining optional elements are its parameters. The subroutine is called like this:
&verify_code($cd, $leaf, $P1, $P2, ... $Pn);
By request of Jim Stern <firstname.lastname@example.org> and Brad Vance <email@example.com>, I updated the Accept and Show functions to support selection of multiple files. I also corrected a typo in the -verify code.
|perl v5.20.3||FILESELECT (3)||2013-11-15|