diff options
author | Timothy Pearson <[email protected]> | 2012-01-01 18:29:30 -0600 |
---|---|---|
committer | Timothy Pearson <[email protected]> | 2012-01-01 18:29:30 -0600 |
commit | b2af005db21bd8fd068cb79b2ae700953128af2c (patch) | |
tree | abd0ed633726bf0bbecb57d30e92836c31e02695 /PerlTQt/t/My | |
parent | c1b9383f2032d82db5eb8918dca885e37a901dde (diff) | |
download | libtqt-perl-b2af005db21bd8fd068cb79b2ae700953128af2c.tar.gz libtqt-perl-b2af005db21bd8fd068cb79b2ae700953128af2c.zip |
Move PerlQt
Diffstat (limited to 'PerlTQt/t/My')
-rw-r--r-- | PerlTQt/t/My/Codec.pm | 10 | ||||
-rw-r--r-- | PerlTQt/t/My/SubCodec.pm | 15 |
2 files changed, 25 insertions, 0 deletions
diff --git a/PerlTQt/t/My/Codec.pm b/PerlTQt/t/My/Codec.pm new file mode 100644 index 0000000..f853f5d --- /dev/null +++ b/PerlTQt/t/My/Codec.pm @@ -0,0 +1,10 @@ +package My::Codec; +use TQt; +use TQt::isa qw( TQt::TextCodec ); + +sub NEW +{ + shift->SUPER::NEW(@_); +} + +1;
\ No newline at end of file diff --git a/PerlTQt/t/My/SubCodec.pm b/PerlTQt/t/My/SubCodec.pm new file mode 100644 index 0000000..35e2b0c --- /dev/null +++ b/PerlTQt/t/My/SubCodec.pm @@ -0,0 +1,15 @@ + +package My::SubCodec; +use TQt; +use My::Codec; +use TQt::isa qw( My::Codec ); + + +sub NEW +{ + shift->SUPER::NEW(@_); +} + +sub bar {} + +1;
\ No newline at end of file |