summaryrefslogtreecommitdiffstats
path: root/PerlQt/t/Foo/SubCodec.pm
blob: 9d79fba9add42960ef9271b37746675394b6e7c5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
package Foo::SubCodec;
use TQt;
use My::Codec;
use TQt::isa qw( My::Codec );


sub NEW
{
    shift->SUPER::NEW(@_);
}

sub foo {}

1;