From: Eshel Yaron <me@eshelyaron.com>
Date: Fri, 2 Aug 2024 09:49:56 +0000 (+0200)
Subject: (read--expression-try-read): Mark as minibuffer-specific
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=723710b001f2ecd392fb3ecec4669644998107a3;p=emacs.git

(read--expression-try-read): Mark as minibuffer-specific
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 54a64e67c4d..d7c545263c9 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2061,7 +2061,7 @@ Exit the minibuffer if successful, else report the error to the
 user and move point to the location of the error.  If point is
 not already at the location of the error, push a mark before
 moving point."
-  (interactive)
+  (interactive "" minibuffer-mode)
   (unless (> (minibuffer-depth) 0)
     (error "Minibuffer must be active"))
   (if (let* ((contents (minibuffer-contents))