Revert "Rename a number of old tq methods that are no longer tq specific"

This reverts commit b6ba5d642f3fc7d320e3d6f4650eb259a3a52b04.

1 files changed, 6 insertions, 6 deletions

diff --git a/languages/pascal/pascalsupport_part.cpp b/languages/pascal/pascalsupport_part.cpp
index 0d8c049b..2b1edd31 100644
--- a/languages/pascal/pascalsupport_part.cpp
+++ b/languages/pascal/pascalsupport_part.cpp
@@ -138,7 +138,7 @@ void PascalSupportPart::addedFilesToProject(const TQStringList &fileList)
     {
         TQString fn = project()->projectDirectory() + "/" + *it;
         maybeParse( fn );
-        kapp->processEvents( 500 );
+        kapp->tqprocessEvents( 500 );
         emit addedSourceInfo(fn);
     }
 }
@@ -173,7 +173,7 @@ void PascalSupportPart::initialParse( )
         for (TQStringList::Iterator it = files.begin(); it != files.end() ;++it){
             TQString fn = project()->projectDirectory() + "/" + *it;
             maybeParse( fn );
-            kapp->processEvents( 500 );
+            kapp->tqprocessEvents( 500 );
         }
 
         emit updatedSourceInfo();
@@ -191,7 +191,7 @@ void PascalSupportPart::maybeParse( const TQString & fileName )
     if( !mime || mime->name() != "text/x-pascal" )
 	return;
 
-    mainWindow()->statusBar()->message( i18n("Parsing file: %1").arg(fileName) );
+    mainWindow()->statusBar()->message( i18n("Parsing file: %1").tqarg(fileName) );
     parse( fileName );
 }
 
@@ -256,10 +256,10 @@ TQString PascalSupportPart::formatTag( const Tag & inputTag )
     switch( tag.kind() )
     {
         case Tag::Kind_Namespace:
-            return TQString::fromLatin1("unit ") + tag.name();
+            return TQString::tqfromLatin1("unit ") + tag.name();
 
         case Tag::Kind_Class:
-            return TQString::fromLatin1("class ") + tag.name();
+            return TQString::tqfromLatin1("class ") + tag.name();
 
         case Tag::Kind_Function:
         case Tag::Kind_FunctionDeclaration:
@@ -271,7 +271,7 @@ TQString PascalSupportPart::formatTag( const Tag & inputTag )
         case Tag::Kind_Variable:
         case Tag::Kind_VariableDeclaration:
         {
-            return TQString::fromLatin1("var ") + tag.name();
+            return TQString::tqfromLatin1("var ") + tag.name();
         }
         break;
     }