* simple.el (completion-list-mode-finish): Don't use toggle-read-only.

Since completion-list-mode has a special mode-class, it wasn't doing
anything extra anyway.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bb7fca91126d5f25b2bc15a935d539f7850b71f9..5bf2036e11f78f830eb0e61ede93bdbd505e156f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2012-06-28  Glenn Morris  <rgm@gnu.org>
+
+       * simple.el (completion-list-mode-finish):
+       Don't use toggle-read-only.  (Since completion-list-mode has
+       a special mode-class, it wasn't doing anything extra anyway.)
+
 2012-06-28  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        Make inlining of other-mode interpreted functions work (bug#11799).

diff --git a/lisp/simple.el b/lisp/simple.el
index 5d56a64eb23b9ce63a80a0bd297fa032a3fb0f3c..1b347794521f7da0d012024ff19644877d8efae3 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -6347,7 +6347,7 @@ Use \\<completion-list-mode-map>\\[mouse-choose-completion] to select one\
   "Finish setup of the completions buffer.
 Called from `temp-buffer-show-hook'."
   (when (eq major-mode 'completion-list-mode)
-    (toggle-read-only 1)))
+    (setq buffer-read-only t)))
 
 (add-hook 'temp-buffer-show-hook 'completion-list-mode-finish)