summaryrefslogtreecommitdiffstats
path: root/PerlQt/t/My
diff options
context:
space:
mode:
authorTimothy Pearson <[email protected]>2011-12-18 03:08:08 -0600
committerTimothy Pearson <[email protected]>2011-12-18 03:08:08 -0600
commitbcc95cd92ca12c1783464b8ada6816d430dc0e98 (patch)
tree4701c447365db5392df0174b4bb00b5b5c369da4 /PerlQt/t/My
downloadlibtqt-perl-bcc95cd92ca12c1783464b8ada6816d430dc0e98.tar.gz
libtqt-perl-bcc95cd92ca12c1783464b8ada6816d430dc0e98.zip
Initial import of libqt-perl (not yet TQt compatible)
Diffstat (limited to 'PerlQt/t/My')
-rw-r--r--PerlQt/t/My/Codec.pm10
-rw-r--r--PerlQt/t/My/SubCodec.pm15
2 files changed, 25 insertions, 0 deletions
diff --git a/PerlQt/t/My/Codec.pm b/PerlQt/t/My/Codec.pm
new file mode 100644
index 0000000..93e1d01
--- /dev/null
+++ b/PerlQt/t/My/Codec.pm
@@ -0,0 +1,10 @@
+package My::Codec;
+use Qt;
+use Qt::isa qw( Qt::TextCodec );
+
+sub NEW
+{
+ shift->SUPER::NEW(@_);
+}
+
+1; \ No newline at end of file
diff --git a/PerlQt/t/My/SubCodec.pm b/PerlQt/t/My/SubCodec.pm
new file mode 100644
index 0000000..58f8987
--- /dev/null
+++ b/PerlQt/t/My/SubCodec.pm
@@ -0,0 +1,15 @@
+
+package My::SubCodec;
+use Qt;
+use My::Codec;
+use Qt::isa qw( My::Codec );
+
+
+sub NEW
+{
+ shift->SUPER::NEW(@_);
+}
+
+sub bar {}
+
+1; \ No newline at end of file