Org: Exclude contact file from desktop more reliably

master
Pierre Neidhardt 2019-04-03 10:43:04 +02:00
parent d32c4872e4
commit 60659df0d3
1 changed files with 2 additions and 1 deletions

View File

@ -52,7 +52,8 @@
(when (file-exists-p contacts)
;; When used to auto-complete e-mail addresses, the file is automatically
;; loaded. The buffer usually need not be restored by a desktop session.
(when desktop-save-mode
(when (and desktop-save-mode
(string-match "\\\\|" desktop-files-not-to-save))
(setq desktop-files-not-to-save
(concat (substring desktop-files-not-to-save 0 -2) "\\|" (regexp-quote (expand-file-name contacts)) "\\)")))
(setq org-contacts-files (list contacts)))))