Commit 8e32fc18185b

Vincent Demeester <vincent@sbr.pm>
2023-10-24 17:58:04
tools/emacs: add function and binding to saving and loading desktop session
Signed-off-by: Vincent Demeester <vincent@sbr.pm>
1 parent 44b94de
Changed files (1)
tools
emacs
tools/emacs/config/config-windows.el
@@ -5,6 +5,21 @@
 
 (setq switch-to-buffer-obey-display-actions t)
 
+(defun vde/save-desktop-no-ask ()
+  "Save the desktop without asking questions by modifying the modtime."
+  (interactive)
+  (require 'desktop)
+  (desktop--get-file-modtime)
+  (desktop-save (concat desktop-dirname)))
+(defun vde/desktop-load ()
+  "Load saved desktop"
+  (interactive)
+  (require 'desktop)
+  (desktop-read desktop-dirname))
+
+(bind-key "C-c d s" #'vde/save-desktop-no-ask)
+(bind-key "C-c d l" #'vde/desktop-load)
+
 ;; Winner
 (use-package winner
   :unless noninteractive