From af5dea30cc40ca7b8aabc58898b1e2bd755beae6 Mon Sep 17 00:00:00 2001 From: Gregory Heytings Date: Sat, 22 Jan 2022 08:21:41 +0000 Subject: [PATCH] Fix Undelete Frame menu item * lisp/menu-bar.el (menu-bar-file-menu): Replace the checkbox with a a disabled item with a tooltip telling that the mode is disabled. --- lisp/menu-bar.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 817c2d485e..8d4ac1692f 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -108,15 +108,15 @@ menu-bar-file-menu (bindings--define-key menu [separator-tab] menu-bar-separator) - (bindings--define-key menu [undelete-frame-mode] - '(menu-item "Allow Undeleting Frames" undelete-frame-mode - :help "Allow frames to be restored after deletion" - :button (:toggle . undelete-frame-mode))) - + (bindings--define-key menu [disabled-undelete-frame-mode] + '(menu-item "Undelete Frame" undelete-frame + :visible (null undelete-frame-mode) + :enable nil + :help "Undelete-Frame mode is currently disabled")) (bindings--define-key menu [undelete-last-deleted-frame] '(menu-item "Undelete Frame" undelete-frame - :enable (and undelete-frame-mode - (car undelete-frame--deleted-frames)) + :visible undelete-frame-mode + :enable undelete-frame--deleted-frames :help "Undelete the most recently deleted frame")) ;; Don't use delete-frame as event name because that is a special -- 2.34.1