* src/minibuf.c (read_minibuf): Ignore caller's inhibit-read-only.
authorStefan Monnier <monnier@iro.umontreal.ca>
Wed, 15 Aug 2012 04:02:14 +0000 (00:02 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Wed, 15 Aug 2012 04:02:14 +0000 (00:02 -0400)
Fixes: debbugs:12117

src/ChangeLog
src/minibuf.c

index 26e1ac3..adf719d 100644 (file)
@@ -1,3 +1,8 @@
+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.
index 59da974..06ea415 100644 (file)
@@ -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