Fix help files, kdevelop->tdevelop branding, fix startup.

1 files changed, 3 insertions, 3 deletions

diff --git a/buildtools/pascal/pascalproject_part.cpp b/buildtools/pascal/pascalproject_part.cpp
index 6ab3bd27..c0d53c89 100644
--- a/buildtools/pascal/pascalproject_part.cpp
+++ b/buildtools/pascal/pascalproject_part.cpp
@@ -417,10 +417,10 @@ void PascalProjectPart::loadProjectConfig( )
 
     if (m_compilerExec.isEmpty())
     {
-        KTrader::OfferList offers = KTrader::self()->query("KDevelop/CompilerOptions", "[X-KDevelop-Language] == 'Pascal'");
+        KTrader::OfferList offers = KTrader::self()->query("TDevelop/CompilerOptions", "[X-TDevelop-Language] == 'Pascal'");
         TQValueList<KService::Ptr>::ConstIterator it;
         for (it = offers.begin(); it != offers.end(); ++it) {
-            if ((*it)->property("X-KDevelop-Default").toBool()) {
+            if ((*it)->property("X-TDevelop-Default").toBool()) {
                 m_compilerExec = (*it)->exec();
                 break;
             }
@@ -453,7 +453,7 @@ KDevCompilerOptions *PascalProjectPart::createCompilerOptions(const TQString &na
     }
 
     TQStringList args;
-    TQVariant prop = service->property("X-KDevelop-Args");
+    TQVariant prop = service->property("X-TDevelop-Args");
     if (prop.isValid())
         args = TQStringList::split(" ", prop.toString());