1 files changed, 2 insertions, 2 deletions
diff --git a/buildtools/pascal/service.cpp b/buildtools/pascal/service.cpp
index 0179fac8..15b607ff 100644
--- a/buildtools/pascal/service.cpp
+++ b/buildtools/pascal/service.cpp
@@ -66,10 +66,10 @@ int ServiceComboBox::itemForText(const TQString &str, const TQStringList &names)
 
 TQString ServiceComboBox::defaultCompiler()
 {
-    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()) {
             return (*it)->name();;
         }
     }