view release on metacpan or  search on metacpan

lib/Tk/DocumentTree.pm  view on Meta::CPAN

=head1 NAME

Tk::DocumentTree - ITree based document list

=cut

use strict;
use vars qw($VERSION);
$VERSION = '0.08';

use base qw(Tk::Derived Tk::Frame);

require Tk::ITree;
use File::Basename;
use Tk;
use Config;

Construct Tk::Widget 'DocumentTree';

my $save_pixmap = '
/* XPM */