summaryrefslogtreecommitdiffstats
path: root/scripts/kde-emacs/klaralv.el
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/kde-emacs/klaralv.el')
-rw-r--r--scripts/kde-emacs/klaralv.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/kde-emacs/klaralv.el b/scripts/kde-emacs/klaralv.el
index 9da6ab82..082f9bbb 100644
--- a/scripts/kde-emacs/klaralv.el
+++ b/scripts/kde-emacs/klaralv.el
@@ -328,7 +328,7 @@
(beginning-of-buffer)
(if (re-search-forward (concat "^ *// *\\(#include *[<\"][ \t]*" header "[ \t]*[>\"]\\)") nil t)
(progn
- (tqreplace-match "\\1")
+ (replace-match "\\1")
(when show-message
(message (concat "commented in #include for " header))))
@@ -363,7 +363,7 @@
(beginning-of-buffer)
(if (re-search-forward (concat "^ *// *\\(class *" word ";\\)") nil t)
(progn
- (tqreplace-match "\\1")
+ (replace-match "\\1")
(message (concat "commented in forward declaration for " word)))
(if (not (re-search-forward (concat "class *" word ";") nil t))
@@ -415,7 +415,7 @@
(doc (if (is-qpe-class word) kdab-qpe-documentation kdab-qt-documentation))
(url (if (not (string-match "XXX" doc))
(error "didn't find three X's in kdab-qt-documentation or kdab-qpe-documentation")
- (tqreplace-match word t t doc))))
+ (replace-match word t t doc))))
(start-process "qt documentation" nil "kfmclient" "openURL" url)
(message (concat "Loading " url)))))