TQt4 port kdevelop

This enables compilation under both Qt3 and Qt4


git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdevelop@1236710 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 7 insertions, 7 deletions

diff --git a/buildtools/pascal/pascalproject_part.cpp b/buildtools/pascal/pascalproject_part.cpp
index 2ed25fc0..6d26ac60 100644
--- a/buildtools/pascal/pascalproject_part.cpp
+++ b/buildtools/pascal/pascalproject_part.cpp
@@ -52,8 +52,8 @@ typedef KDevGenericFactory<PascalProjectPart> PascalProjectFactory;
 static const KDevPluginInfo data("kdevpascalproject");
 K_EXPORT_COMPONENT_FACTORY( libkdevpascalproject, PascalProjectFactory( data ) )
 
-PascalProjectPart::PascalProjectPart(TQObject *parent, const char *name, const TQStringList& )
-    :KDevBuildTool(&data, parent, name ? name : "PascalProjectPart" )
+PascalProjectPart::PascalProjectPart(TQObject *tqparent, const char *name, const TQStringList& )
+    :KDevBuildTool(&data, tqparent, name ? name : "PascalProjectPart" )
 {
     setInstance(PascalProjectFactory::instance());
     setXMLFile("kdevpascalproject.rc");
@@ -149,7 +149,7 @@ void PascalProjectPart::openProject(const TQString &dirName, const TQString &pro
     do {
         dir.setPath(s.pop());
         kdDebug(9033) << "Examining: " << dir.path() << endl;
-        const QFileInfoList *dirEntries = dir.entryInfoList();
+        const TQFileInfoList *dirEntries = dir.entryInfoList();
         TQPtrListIterator<TQFileInfo> it(*dirEntries);
         for (; it.current(); ++it) {
             TQString fileName = it.current()->fileName();
@@ -256,7 +256,7 @@ TQString PascalProjectPart::mainSource() const
 void PascalProjectPart::setMainSource(TQString fullPath)
 {
     TQString olddir = activeDirectory();
-    m_mainSource = fullPath.replace(TQRegExp(TQString(projectDirectory() + TQString("/"))),"");
+    m_mainSource = fullPath.tqreplace(TQRegExp(TQString(projectDirectory() + TQString("/"))),"");
     emit activeDirectoryChanged( olddir, activeDirectory() );
 }
 
@@ -273,7 +273,7 @@ TQString PascalProjectPart::projectName() const
 TQString PascalProjectPart::activeDirectory() const
 {
     TQFileInfo fi(mainSource());
-    return fi.dirPath(true).replace(TQRegExp(projectDirectory()),"");
+    return fi.dirPath(true).tqreplace(TQRegExp(projectDirectory()),"");
 }
 
 TQString PascalProjectPart::buildDirectory() const
@@ -287,7 +287,7 @@ void PascalProjectPart::listOfFiles(TQStringList &result, TQString path) const
     TQDir d(path);
     if (!d.exists())
         return;
-    QFileInfoList *entries = const_cast<QFileInfoList*>(d.entryInfoList(TQDir::Dirs | TQDir::Files | TQDir::Hidden));
+    TQFileInfoList *entries = const_cast<TQFileInfoList*>(d.entryInfoList(TQDir::Dirs | TQDir::Files | TQDir::Hidden));
     for (TQFileInfo *it = entries->first(); it; it = entries->next())
     {
         if ((it->isDir()) && (it->filePath() != path))
@@ -448,7 +448,7 @@ KDevCompilerOptions *PascalProjectPart::createCompilerOptions(const TQString &na
     if (!factory) {
         TQString errorMessage = KLibLoader::self()->lastErrorMessage();
         KMessageBox::error(0, i18n("There was an error loading the module %1.\n"
-                                   "The diagnostics is:\n%2").arg(service->name()).arg(errorMessage));
+                                   "The diagnostics is:\n%2").tqarg(service->name()).tqarg(errorMessage));
         exit(1);
     }