From 4e997a9c6e25689dca65a2ec573a599699ef8170 Mon Sep 17 00:00:00 2001
From: Timothy Pearson <kb9vqf@pearsoncomputing.net>
Date: Sun, 1 Jan 2012 18:24:37 -0600
Subject: Initial TQt conversion

---
 PerlQt/lib/Qt/attributes.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'PerlQt/lib/Qt/attributes.pm')

diff --git a/PerlQt/lib/Qt/attributes.pm b/PerlQt/lib/Qt/attributes.pm
index 3a25487..4398fa5 100644
--- a/PerlQt/lib/Qt/attributes.pm
+++ b/PerlQt/lib/Qt/attributes.pm
@@ -1,10 +1,10 @@
-package Qt::attributes;
+package TQt::attributes;
 #
 # I plan to support public/protected/private attributes. here goes.
 # Attributes default to protected.
 #
 # package MyBase;
-# use Qt::attributes qw(
+# use TQt::attributes qw(
 # private:
 #    foo
 # protected:
@@ -14,7 +14,7 @@ package Qt::attributes;
 # );
 #
 # package MyDerived;
-# use Qt::isa qw(MyBase);
+# use TQt::isa qw(MyBase);
 #
 # sub foo {
 #     # 1 way to access private attributes from derived class
@@ -43,7 +43,7 @@ sub import {
 
     for my $attribute (@_) {
 	exists ${ ${$caller . '::META'}{'attributes'} }{$attribute} and next;
-	Qt::_internal::installattribute($caller, $attribute);
+	TQt::_internal::installattribute($caller, $attribute);
         ${ ${$caller . '::META'}{'attributes'} }{$attribute} = 1;
     }
 }
-- 
cgit v1.2.3