org: Do not save org-contacts-files in desktop session
parent
1feb0739a8
commit
b1367de8ef
|
@ -33,6 +33,10 @@
|
||||||
|
|
||||||
(when (require 'org-contacts nil t)
|
(when (require 'org-contacts nil t)
|
||||||
(let ((contacts "~/personal/contacts/contacts.org"))
|
(let ((contacts "~/personal/contacts/contacts.org"))
|
||||||
(when (file-exists-p contacts) (setq org-contacts-files (list contacts)))))
|
(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.
|
||||||
|
(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)))))
|
||||||
|
|
||||||
(provide 'init-org)
|
(provide 'init-org)
|
||||||
|
|
Loading…
Reference in New Issue