From bcc95cd92ca12c1783464b8ada6816d430dc0e98 Mon Sep 17 00:00:00 2001
From: Timothy Pearson <kb9vqf@pearsoncomputing.net>
Date: Sun, 18 Dec 2011 03:08:08 -0600
Subject: Initial import of libqt-perl (not yet TQt compatible)

---
 PerlQt/t/f_import.t | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 PerlQt/t/f_import.t

(limited to 'PerlQt/t/f_import.t')

diff --git a/PerlQt/t/f_import.t b/PerlQt/t/f_import.t
new file mode 100644
index 0000000..c6467a3
--- /dev/null
+++ b/PerlQt/t/f_import.t
@@ -0,0 +1,19 @@
+BEGIN { push @INC, "./t" ; print "1..1\n" }
+
+package main;
+
+use Qt;
+use My::SubCodec;
+use Foo::SubCodec;
+
+$tc1 = My::SubCodec();
+$tc2 = Foo::SubCodec();
+
+$tc1->bar();
+$tc2->foo();
+
+$tc2->deleteAllCodecs;
+
+#  all imports OK
+
+print "ok 1\n";
-- 
cgit v1.2.3