1 files changed, 3 insertions, 3 deletions
diff --git a/languages/perl/perldoc.cpp b/languages/perl/perldoc.cpp
index b699a0f5..bbb2fa2d 100644
--- a/languages/perl/perldoc.cpp
+++ b/languages/perl/perldoc.cpp
@@ -37,10 +37,10 @@ void PerldocProtocol::get(const KURL& url)
     if (l[0] == "functions") {
         plain = true;
         cmd += "-t -f ";
-        cmd += KProcess::quote(l[1]);
+        cmd += TDEProcess::quote(l[1]);
     } else if (l[0] == "faq") {
         cmd += "-u -q ";
-        cmd += KProcess::quote(l[1]);
+        cmd += TDEProcess::quote(l[1]);
         cmd += " | pod2html";
     } else {
         TQCString errstr(i18n("The only existing directories are functions and faq.").local8Bit());
@@ -117,7 +117,7 @@ extern "C" {
     int kdemain(int argc, char **argv)
     {
         TDEInstance instance( "kio_perldoc" );
-        KGlobal::locale()->setMainCatalogue("tdevelop");
+        TDEGlobal::locale()->setMainCatalogue("tdevelop");
 
         if (argc != 4) {
             fprintf(stderr, "Usage: kio_perldoc protocol domain-socket1 domain-socket2\n");