summaryrefslogtreecommitdiff
path: root/lisp/replace.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 28e0d06f720..474e6158e87 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -63,6 +63,7 @@ strings or patterns."
:version "21.3")
(defun query-replace-read-args (string regexp-flag)
+ (barf-if-buffer-read-only)
(let (from to)
(if query-replace-interactive
(setq from (car (if regexp-flag regexp-search-ring search-ring)))