From 6392f5a9dfce2bf83617d49bb7f332181ec6004e Mon Sep 17 00:00:00 2001
From: Michele Calgaro <michele.calgaro@yahoo.it>
Date: Sun, 25 May 2014 15:37:31 +0900
Subject: Revert "Finish renaming tdevelop components" This reverts commit
 722ce1efbac31c61b1d4b13f7e075c9f311e3e73.

---
 languages/perl/perlsupportpart.cpp | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

(limited to 'languages/perl/perlsupportpart.cpp')

diff --git a/languages/perl/perlsupportpart.cpp b/languages/perl/perlsupportpart.cpp
index 08627ea5..c8379c77 100644
--- a/languages/perl/perlsupportpart.cpp
+++ b/languages/perl/perlsupportpart.cpp
@@ -19,24 +19,24 @@
 #include <tdeaction.h>
 #include <tdeapplication.h>
 #include <kdebug.h>
-#include <tdevgenericfactory.h>
+#include <kdevgenericfactory.h>
 #include <kinputdialog.h>
 #include <tdelocale.h>
 #include <tqregexp.h>
 #include <codemodel.h>
 #include <tqprogressbar.h>
 #include <kstatusbar.h>
-#include "tdevmainwindow.h"
+#include "kdevmainwindow.h"
 
 #include <kprocess.h>
 #include <stdlib.h>
 #include <unistd.h>
 
-#include "tdevcore.h"
-#include "tdevproject.h"
-#include "tdevpartcontroller.h"
-#include "tdevplugininfo.h"
-#include "tdevappfrontend.h"
+#include "kdevcore.h"
+#include "kdevproject.h"
+#include "kdevpartcontroller.h"
+#include "kdevplugininfo.h"
+#include "kdevappfrontend.h"
 //#include "classstore.h"
 //#include "parsedclass.h"
 //#include "parsedmethod.h"
@@ -44,16 +44,16 @@
 #include "domutil.h"
 //#include "programmingbycontract.h"
 
-typedef TDevGenericFactory<PerlSupportPart> PerlSupportFactory;
-static const TDevPluginInfo data("tdevperlsupport");
-K_EXPORT_COMPONENT_FACTORY( libtdevperlsupport, PerlSupportFactory( data ) )
+typedef KDevGenericFactory<PerlSupportPart> PerlSupportFactory;
+static const KDevPluginInfo data("kdevperlsupport");
+K_EXPORT_COMPONENT_FACTORY( libkdevperlsupport, PerlSupportFactory( data ) )
 
 PerlSupportPart::PerlSupportPart(TQObject *parent, const char *name, const TQStringList &)
-    : TDevLanguageSupport(&data, parent, name ? name : "PerlSupportPart")
+    : KDevLanguageSupport(&data, parent, name ? name : "PerlSupportPart")
 {
     setInstance(PerlSupportFactory::instance());
 
-    setXMLFile("tdevperlsupport.rc");
+    setXMLFile("kdevperlsupport.rc");
 
     connect( core(), TQT_SIGNAL(projectOpened()), this, TQT_SLOT(projectOpened()) );
     connect( core(), TQT_SIGNAL(projectClosed()), this, TQT_SLOT(projectClosed()) );
@@ -174,9 +174,9 @@ void PerlSupportPart::savedFile(const KURL &fileName)
 }
 
 
-TDevLanguageSupport::Features PerlSupportPart::features()
+KDevLanguageSupport::Features PerlSupportPart::features()
 {
-    return TDevLanguageSupport::Features(Classes | Functions | Variables | Namespaces | /*Scripts | */NewClass | AddMethod | AddAttribute /*| NewScript*/);
+    return KDevLanguageSupport::Features(Classes | Functions | Variables | Namespaces | /*Scripts | */NewClass | AddMethod | AddAttribute /*| NewScript*/);
 //    return Functions;
 }
 
@@ -193,7 +193,7 @@ TQString PerlSupportPart::interpreter()
 void PerlSupportPart::startApplication(const TQString &program)
 {
     bool inTerminal = DomUtil::readBoolEntry(*projectDom(), "/kdevperlsupport/run/terminal");
-    if (TDevAppFrontend *appFrontend = extension<TDevAppFrontend>("TDevelop/AppFrontend"))
+    if (KDevAppFrontend *appFrontend = extension<KDevAppFrontend>("TDevelop/AppFrontend"))
         appFrontend->startAppCommand(TQString(), program, inTerminal);
 }
 
-- 
cgit v1.2.3