* src/minibuf.c (read_minibuf): Ignore caller's inhibit-read-only.

Fixes: debbugs:12117

* src/minibuf.c (read_minibuf): Ignore caller's inhibit-read-only.
Fixes: debbugs:12117
7f6feb56 · Stefan Monnier · 582db660 · 7f6feb56 · 7f6feb56
Commit 7f6feb56 authored Aug 15, 2012 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 0 deletions

src/ChangeLog src/ChangeLog +5 -0

src/minibuf.c src/minibuf.c +1 -0

No files found.
--- a/src/ChangeLog
+++ b/src/ChangeLog
+2012-08-15  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* minibuf.c (read_minibuf): Ignore caller's inhibit-read-only
+	(bug#12117).
+
 2012-08-14  Stefan Monnier  <monnier@iro.umontreal.ca>

 	* alloc.c (Fgarbage_collect): Use plural form consistently.

--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -408,6 +408,7 @@ read_minibuf (Lisp_Object map, Lisp_Object initial, Lisp_Object prompt,
  Lisp_Object dummy, frame;

  specbind (Qminibuffer_default, defalt);
+  specbind (intern ("inhibit-read-only"), Qnil);

  /* If Vminibuffer_completing_file_name is `lambda' on entry, it was t
     in previous recursive minibuffer, but was not set explicitly