1 files changed, 8 insertions, 8 deletions

diff --git a/languages/pascal/pascalsupport_part.cpp b/languages/pascal/pascalsupport_part.cpp
index 0d8c049b..57ef642d 100644
--- a/languages/pascal/pascalsupport_part.cpp
+++ b/languages/pascal/pascalsupport_part.cpp
@@ -47,8 +47,8 @@ typedef KDevGenericFactory<PascalSupportPart> PascalSupportFactory;
 static const KDevPluginInfo data("kdevpascalsupport");
 K_EXPORT_COMPONENT_FACTORY( libkdevpascalsupport, PascalSupportFactory( data ) )
 
-PascalSupportPart::PascalSupportPart(TQObject *parent, const char *name, const TQStringList &)
-  : KDevLanguageSupport(&data, parent, name ? name : "KDevPascalSupport" ),
+PascalSupportPart::PascalSupportPart(TQObject *tqparent, const char *name, const TQStringList &)
+  : KDevLanguageSupport(&data, tqparent, name ? name : "KDevPascalSupport" ),
     d( new PascalSupportPartData() )
 {
     setInstance(PascalSupportFactory::instance());
@@ -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;
     }