diff options
author | Timothy Pearson <[email protected]> | 2012-10-21 02:31:38 -0500 |
---|---|---|
committer | Timothy Pearson <[email protected]> | 2012-10-21 02:31:38 -0500 |
commit | fb58d85d5ff9e001c9ce15cee3a59ea7f1addbab (patch) | |
tree | 74f175a79a66347aabea0d0126fbb42e07535b76 | |
parent | ccbb8b410745d7a2dd390c20849397270458ab53 (diff) | |
download | libtqt-perl-fb58d85d5ff9e001c9ce15cee3a59ea7f1addbab.tar.gz libtqt-perl-fb58d85d5ff9e001c9ce15cee3a59ea7f1addbab.zip |
Update TQt3 property/enum macros
-rw-r--r-- | kalyptus/README | 2 | ||||
-rw-r--r-- | kalyptus/kalyptus | 12 |
2 files changed, 7 insertions, 7 deletions
diff --git a/kalyptus/README b/kalyptus/README index a966384..e56448e 100644 --- a/kalyptus/README +++ b/kalyptus/README @@ -47,7 +47,7 @@ JAVA Here are some of the shell commands that were used in the conversion process: -Remove any Q_OVERRIDE macros from the Qt headers, and remove EXPORT_DOCKCLASS from the +Remove any TQ_OVERRIDE macros from the Qt headers, and remove EXPORT_DOCKCLASS from the KDE headers # Generate Java and C++ sources. Copy all the target headers to directory 'test/tmp' diff --git a/kalyptus/kalyptus b/kalyptus/kalyptus index 3de8b85..056a7d4 100644 --- a/kalyptus/kalyptus +++ b/kalyptus/kalyptus @@ -535,15 +535,15 @@ LOOP: # ); # - next if ( $p =~ /^\s*Q_ENUMS/ # ignore Q_ENUMS + next if ( $p =~ /^\s*TQ_ENUMS/ # ignore TQ_ENUMS || $p =~ /^\s*TQ_OBJECT/ # and TQ_OBJECT || $p =~ /^\s*Q_FLAGS/ # and Q_FLAGS || $p =~ /^\s*Q_DECLARE_FLAGS/ # and Q_DECLARE_FLAGS - || ( !$qt4 && $p =~ /^\s*Q_PROPERTY/ ) # and Q_PROPERTY + || ( !$qt4 && $p =~ /^\s*TQ_PROPERTY/ ) # and TQ_PROPERTY || $p =~ /^\s*TQDOC_PROPERTY/ || $p =~ /^\s*Q_GADGET/ - || $p =~ /^\s*Q_OVERRIDE/ # and Q_OVERRIDE - || $p =~ /^\s*Q_SETS/ + || $p =~ /^\s*TQ_OVERRIDE/ # and TQ_OVERRIDE + || $p =~ /^\s*TQ_SETS/ || $p =~ /^\s*Q_DUMMY_COMPARISON_OPERATOR/ || $p =~ /^\s*K_SYCOCATYPE/ # and K_SYCOCA stuff || $p =~ /^\s*K_SYCOCAFACTORY/ # @@ -727,7 +727,7 @@ sub readDecl $declNodeType = "c"; return $l; } - elsif ( $l =~ /Q_PROPERTY/ ) { # property + elsif ( $l =~ /TQ_PROPERTY/ ) { # property return $l; } @@ -810,7 +810,7 @@ sub identifyDecl $cNode->AddProp( "DcopExported", 1 ); } # properties - elsif ( $decl =~ s/Q_PROPERTY// ) { + elsif ( $decl =~ s/TQ_PROPERTY// ) { print "Property: <$1>\n" if $debug; $newNode = newProperty( $decl ); |