From: Juri Linkov <juri@linkov.net>
Date: Mon, 20 Jan 2020 00:14:24 +0000 (+0200)
Subject: * lisp/menu-bar.el (menu-bar-options-menu): Add desktop-save-mode (bug#37594)
X-Git-Tag: emacs-27.0.90~129
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dde313151d32bbea358b0c019104035582710a5e;p=emacs.git

* lisp/menu-bar.el (menu-bar-options-menu): Add desktop-save-mode (bug#37594)
---

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 8f825a19adc..731da193ef1 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1476,6 +1476,18 @@ mail status in mode line"))
     (bindings--define-key menu [cursor-separator]
       menu-bar-separator)
 
+    (bindings--define-key menu [save-desktop]
+      (menu-bar-make-toggle
+       toggle-save-desktop-globally desktop-save-mode
+       "Save State between Sessions"
+       "Saving desktop state %s"
+       "Visit desktop of previous session when restarting Emacs"
+       (require 'desktop)
+       ;; Do it by name, to avoid a free-variable
+       ;; warning during byte compilation.
+       (set-default
+	'desktop-save-mode (not (symbol-value 'desktop-save-mode)))))
+
     (bindings--define-key menu [save-place]
       (menu-bar-make-toggle
        toggle-save-place-globally save-place-mode