From 82257951e9794ac368c405d1ab8ec86a7c175a31 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sun, 16 Oct 2022 12:59:13 +0200 Subject: [PATCH] Don't ding when exiting help-for-help with C-g * lisp/help-macro.el (make-help-screen): Don't ding on "C-g". --- lisp/help-macro.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/help-macro.el b/lisp/help-macro.el index 91c2a804000..687d6fbb4eb 100644 --- a/lisp/help-macro.el +++ b/lisp/help-macro.el @@ -210,7 +210,8 @@ and then returns." (unless (eq new-frame (selected-frame)) (iconify-frame new-frame)) (setq new-frame nil))) - (ding))))) + (unless (equal (key-description key) "C-g") + (ding)))))) (when config (set-window-configuration config)) (when new-frame -- 2.39.5