diff --git a/config.org b/config.org index 12fff58..35e531d 100644 --- a/config.org +++ b/config.org @@ -727,27 +727,27 @@ echo 'cleaned .elc from package directory' Paths need to be different for work and home #+BEGIN_SRC emacs-lisp -(if (string-equal my/whoami "work_remote") - (progn - (defvar PATH_ORG_FILES "p:/Eigene Dateien/Notizen/") - (defvar PATH_ORG_JOURNAL "p:/Eigene Dateien/Notizen/Journal/") - (defvar PATH_START "p:/Eigene Dateien/Notizen/")) +(pcase my/whoami + "work_remote" + (progn + (defvar PATH_ORG_FILES "p:/Eigene Dateien/Notizen/") + (defvar PATH_ORG_JOURNAL "p:/Eigene Dateien/Notizen/Journal/") + (defvar PATH_START "p:/Eigene Dateien/Notizen/")) + "home" + (progn + (setq org-default-notes-file "~/Archiv/Dokumente/Notizen/notes.org") + (setq org-agenda-files + (delq nil + (mapcar (lambda (x) (and (file-exists-p x) x)) + '("~/Archiv/Dokumente/Agenda"))))) + "work_remote" + (progn + (setq org-default-notes-file (concat PATH_ORG_FILES "notes.org")) + (setq org-agenda-files (list(concat PATH_ORG_FILES "notes.org") + (concat PATH_ORG_FILES "projects.org") + (concat PATH_ORG_FILES "todo.org")))) ) -(if (string-equal my/whoami "home") - (progn - (setq org-default-notes-file "~/Archiv/Dokumente/Notizen/notes.org") - (setq org-agenda-files - (delq nil - (mapcar (lambda (x) (and (file-exists-p x) x)) - '("~/Archiv/Dokumente/Agenda"))))) - (if (string-equal my/whoami "work_remote") - (progn - (setq org-default-notes-file (concat PATH_ORG_FILES "notes.org")) - (setq org-agenda-files (list(concat PATH_ORG_FILES "notes.org") - (concat PATH_ORG_FILES "projects.org") - (concat PATH_ORG_FILES "todo.org")))))) - (setq org-id-locations-file (concat PATH_USER_LOCAL ".org-id-locations")) #+END_SRC