From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 15 Aug 2012 04:02:14 +0000 (-0400)
Subject: * src/minibuf.c (read_minibuf): Ignore caller's inhibit-read-only.
X-Git-Tag: emacs-24.2.90~665
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7f6feb56a7811ca06f89892d69a77bf72d9977a3;p=emacs.git

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

Fixes: debbugs:12117
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 26e1ac3d9c2..adf719d7efd 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -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.
diff --git a/src/minibuf.c b/src/minibuf.c
index 59da974df00..06ea415db62 100644
--- 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