org-contacts: Set contact file only if present

2017-08-11 09:59:19 +01:00 · 2017-08-11 09:59:19 +01:00 · d1b0797aa9
parent 0dd31d0ded
commit d1b0797aa9
1 changed files with 2 additions and 1 deletions
--- a/.emacs.d/lisp/init-org.el
+++ b/.emacs.d/lisp/init-org.el
@ -32,6 +32,7 @@
  (add-hook 'org-mode-hook fun))

 (when (require 'org-contacts nil t)
-  (setq org-contacts-files '("~/personal/contacts/contacts.org")))
+  (let ((contacts "~/personal/contacts/contacts.org"))
+    (when (file-exists-p contacts) (setq org-contacts-files (list contacts)))))

 (provide 'init-org)