From 47632dd2ac8c5516a01d60ddf992d892f215bd1c Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Sun, 16 Jun 2013 14:27:14 +0200 Subject: [PATCH] Emacs desktop session setup. --- .emacs | 4 +--- .emacs.d/main.el | 4 ++++ 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/.emacs b/.emacs index 01a7d8c7..214569f7 100644 --- a/.emacs +++ b/.emacs @@ -23,8 +23,7 @@ Example: to assign some-function to C-i, use ;; Cache folder is everything we do not want to track. (setq emacs-cache-folder "~/.cache/emacs/") -(if - (not (file-directory-p emacs-cache-folder)) +(if (not (file-directory-p emacs-cache-folder)) (make-directory emacs-cache-folder t)) ;; Local plugin folder for quick install. All files in this folder will be @@ -49,4 +48,3 @@ Example: to assign some-function to C-i, use ;; End of file ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - \ No newline at end of file diff --git a/.emacs.d/main.el b/.emacs.d/main.el index a1008f79..5cd3d424 100644 --- a/.emacs.d/main.el +++ b/.emacs.d/main.el @@ -406,4 +406,8 @@ has errors and/or warnings." ;; Let Emacs auto-load/save sessions. (desktop-save-mode 1) (setq history-length 250) +(setq desktop-dirname (concat emacs-cache-folder "desktop")) +(if (not (file-directory-p desktop-dirname)) + (make-directory desktop-dirname t)) +(setq desktop-path `(,desktop-dirname)) (add-to-list 'desktop-globals-to-save 'compile-command)