changeset 98145:9d5c120a08ec

(perform-replace): Don't set inhibit-read-only using query-replace-skip-read-only (bug#956).
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 12 Sep 2008 00:37:41 +0000
parents 142baa998501
children ece01493dfe3
files lisp/replace.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/replace.el	Thu Sep 11 20:24:16 2008 +0000
+++ b/lisp/replace.el	Fri Sep 12 00:37:41 2008 +0000
@@ -1665,8 +1665,7 @@
 		    (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)