From b2af005db21bd8fd068cb79b2ae700953128af2c Mon Sep 17 00:00:00 2001 From: Timothy Pearson Date: Sun, 1 Jan 2012 18:29:30 -0600 Subject: Move PerlQt --- PerlTQt/t/My/Codec.pm | 10 ++++++++++ PerlTQt/t/My/SubCodec.pm | 15 +++++++++++++++ 2 files changed, 25 insertions(+) create mode 100644 PerlTQt/t/My/Codec.pm create mode 100644 PerlTQt/t/My/SubCodec.pm (limited to 'PerlTQt/t/My') 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 -- cgit v1.2.3