123456789101112131415 #!/usr/bin/perl -wuse strict;use warnings;use Test::More tests => 3;use_ok 'GappX::FileTree';my $t = GappX::FileTree->new;isa_ok $t, 'GappX::FileTree';isa_ok $t->gobject, 'Gtk2::TreeView';use Gapp;$t->update;
#!/usr/bin/perl -w
use
strict;
warnings;
Test::More
tests
=> 3;
use_ok
'GappX::FileTree'
;
my
$t
= GappX::FileTree->new;
isa_ok
,
->gobject,
'Gtk2::TreeView'
Gapp;
->update;