From ac5e41a146dd1baa1153fa38a2f420f32e1dd976 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Mon, 1 Jul 2024 17:31:56 +0200 Subject: [PATCH] (read-multiple-choice): Respect 'inhibit-interaction' --- lisp/emacs-lisp/rmc.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/emacs-lisp/rmc.el b/lisp/emacs-lisp/rmc.el index 568faf3580d..4733a1b5fcd 100644 --- a/lisp/emacs-lisp/rmc.el +++ b/lisp/emacs-lisp/rmc.el @@ -193,6 +193,7 @@ Usage example: \\='((?a \"always\") (?s \"session only\") (?n \"no\")))" + (when inhibit-interaction (signal 'inhibited-interaction nil)) (while-let ((cell (seq-find (lambda (elem) (not (characterp (car elem)))) choices))) -- 2.39.2