From 9ba04742771370f59740e32e11c5f3a1e6a1b70a Mon Sep 17 00:00:00 2001
From: Timothy Pearson <kb9vqf@pearsoncomputing.net>
Date: Mon, 5 Dec 2011 15:55:57 -0600
Subject: Initial TQt conversion

---
 kalyptus/kalyptusCxxToECMA.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'kalyptus/kalyptusCxxToECMA.pm')

diff --git a/kalyptus/kalyptusCxxToECMA.pm b/kalyptus/kalyptusCxxToECMA.pm
index 987e81c1..5b419732 100644
--- a/kalyptus/kalyptusCxxToECMA.pm
+++ b/kalyptus/kalyptusCxxToECMA.pm
@@ -74,7 +74,7 @@ sub preParseClass
 	}
 
 	if( $classNode->{Access} eq "private" ||
-	    $classNode->{Access} eq "protected" || # e.g. QPixmap::QPixmapData
+	    $classNode->{Access} eq "protected" || # e.g. TQPixmap::TQPixmapData
 	    exists $classNode->{Tmpl} ||
 	    $className eq 'KJS' || $className eq 'KSVG' || # namespaces
 	    $className =~ /^KSVG::KSVG/ || $className eq 'KSVG::CachedGlyph' || # Not DOM classes
@@ -83,7 +83,7 @@ sub preParseClass
 	    $className eq 'KSVG::SVGLoader' ||
 	    $className eq 'KSVG::SVGElementImpl::MouseEvent' ||
 		$className eq 'KSVG::SVGRegisteredEventListener' ||
-	    $classNode->{NodeType} eq 'union' # Skip unions for now, e.g. QPDevCmdParam
+	    $classNode->{NodeType} eq 'union' # Skip unions for now, e.g. TQPDevCmdParam
 	  ) {
 	    print STDERR "Skipping $className "; #if ($debug);
 
-- 
cgit v1.2.1