1 files changed, 12 insertions, 12 deletions
diff --git a/PerlQt/lib/Qt/isa.pm b/PerlQt/lib/Qt/isa.pm
index fb4b646..71e9391 100644
--- a/PerlQt/lib/Qt/isa.pm
+++ b/PerlQt/lib/Qt/isa.pm
@@ -1,4 +1,4 @@
-package Qt::isa;
+package TQt::isa;
 use strict;
 
 sub import {
@@ -10,12 +10,12 @@ sub import {
     my $pm = $caller . ".pm";
     $pm =~ s!::!/!g;
     unless(exists $::INC{$pm}) {
-	$::INC{$pm} = $::INC{"Qt/isa.pm"};
+	$::INC{$pm} = $::INC{"TQt/isa.pm"};
     }
 
     for my $super (@_) {
 	push @{ $caller . '::ISA' }, $super;
-	push @{ ${$caller . '::META'}{'superClass'} }, $super; # if isa(QObject)?
+	push @{ ${$caller . '::META'}{'superClass'} }, $super; # if isa(TQObject)?
     }
 
     *{ $caller . '::className' } = sub {	# closure on $caller
@@ -23,10 +23,10 @@ sub import {
     };
 
     ${ $caller. '::_INTERNAL_STATIC_'}{'SUPER'} = bless {}, "  $caller";
-    Qt::_internal::installsuper($caller) unless defined &{ $caller.'::SUPER' };   
+    TQt::_internal::installsuper($caller) unless defined &{ $caller.'::SUPER' };   
 
     *{ $caller . '::metaObject' } = sub {
-	Qt::_internal::getMetaObject($caller);
+	TQt::_internal::getMetaObject($caller);
     };
 
     *{ $caller . '::import' } = sub {
@@ -53,18 +53,18 @@ sub import {
             {
                 if(! defined  &{$incaller.'::'.$attribute })
                 {
-                    Qt::_internal::installattribute($incaller, $attribute);
+                    TQt::_internal::installattribute($incaller, $attribute);
                     ${ ${$incaller .'::META'}{'attributes'} }{$attribute} = 1;
                 }
             }
         }
     };
 
-    Qt::_internal::installautoload("  $caller");
-    Qt::_internal::installautoload(" $caller");
-    Qt::_internal::installautoload($caller);
+    TQt::_internal::installautoload("  $caller");
+    TQt::_internal::installautoload(" $caller");
+    TQt::_internal::installautoload($caller);
     {
-	package Qt::AutoLoad;
+	package TQt::AutoLoad;
 	my $autosub = \&{ " $caller\::_UTOLOAD" };
 	*{ " $caller\::AUTOLOAD" } = sub { &$autosub };
         $autosub = \&{ "  $caller\::_UTOLOAD" };
@@ -72,10 +72,10 @@ sub import {
 	$autosub = \&{ "$caller\::_UTOLOAD" };
 	*{ "$caller\::AUTOLOAD" } = sub { &$autosub };
     }
-    Qt::_internal::installthis($caller);
+    TQt::_internal::installthis($caller);
 
     # operator overloading
-    *{ " $caller\::ISA" } = ["Qt::base::_overload"];
+    *{ " $caller\::ISA" } = ["TQt::base::_overload"];
 }
 
 1;