diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2008-09-12 00:37:41 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2008-09-12 00:37:41 +0000 |
commit | f2e7b9ef887c547b76fd5cff1a98efbe10e0f345 (patch) | |
tree | b30cd207c1b3642203e4c5e9c0c480670836d2e5 /lisp/replace.el | |
parent | b13f8bd52dd0e0da87779ca09ce066fc98353d51 (diff) | |
download | emacs-f2e7b9ef887c547b76fd5cff1a98efbe10e0f345.tar.gz |
(perform-replace): Don't set inhibit-read-only using
query-replace-skip-read-only (bug#956).
Diffstat (limited to 'lisp/replace.el')
-rw-r--r-- | lisp/replace.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 086380ffc4c..5efbe417b04 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -1665,8 +1665,7 @@ make, or the user didn't cancel the call." (funcall (car replacements) (cdr replacements) replace-count))) (if (not query-flag) - (let ((inhibit-read-only - query-replace-skip-read-only)) + (progn (unless (or literal noedit) (replace-highlight (nth 0 real-match-data) (nth 1 real-match-data) |