diff options
| author | Darrell Anderson <humanreadable@yahoo.com> | 2014-02-16 14:28:28 -0600 |
|---|---|---|
| committer | Darrell Anderson <humanreadable@yahoo.com> | 2014-02-16 14:28:28 -0600 |
| commit | a6a23aed1b0edfbc71afc07343e1e14883daf852 (patch) | |
| tree | 46b2ffea71d6e933000c60ab1861785513e0f92f /scripts/kde-emacs/kde-emacs-compat.el | |
| parent | 10510f1d19017faac9507f66592ac87a9f6a0cd7 (diff) | |
| download | tdesdk-a6a23aed1b0edfbc71afc07343e1e14883daf852.tar.gz tdesdk-a6a23aed1b0edfbc71afc07343e1e14883daf852.zip | |
Fix unintended renaming
Diffstat (limited to 'scripts/kde-emacs/kde-emacs-compat.el')
| -rw-r--r-- | scripts/kde-emacs/kde-emacs-compat.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/kde-emacs/kde-emacs-compat.el b/scripts/kde-emacs/kde-emacs-compat.el index 1ff1fe7a..72d8c2b9 100644 --- a/scripts/kde-emacs/kde-emacs-compat.el +++ b/scripts/kde-emacs/kde-emacs-compat.el @@ -46,7 +46,7 @@ Otherwise treat `\\' in NEWTEXT as special: (buffer-string)) (let ((start 0) newstr) (while (string-match regexp str start) - (setq newstr (replace-match newtext t literal str) + (set newstr (replace-match newtext t literal str) start (+ (match-end 0) (- (length newstr) (length str))) str newstr)) str))) |