Commit 4674ca90 authored by Victor A. Stoichiţă's avatar Victor A. Stoichiţă
Browse files

[org] vic/toggle-agenda-file-set. also change some defaults for agenda

parent 9b7a1949
......@@ -15,7 +15,7 @@
org-yank-folded-subtrees t
org-catch-invisible-edits 'smart
org-id-link-to-org-use-id 'create-if-interactive
org-archive-location "::* Archives")
org-archive-location "%s_archive::")
(global-set-key "\C-cL" 'org-insert-link-global)
(global-set-key "\C-co" 'org-open-at-point-global)
......@@ -64,13 +64,24 @@
;;; AGENDA:
;;;; Basics
(setq org-agenda-files '("~/notes"))
(setq org-agenda-window-setup (quote reorganize-frame) ; open agenda in current window
org-agenda-restore-windows-after-quit t
org-deadline-warning-days 5 ; warn me of deadlines in the next 5 days
org-deadline-warning-days 3 ; warn me of deadlines in the next 5 days
org-agenda-skip-deadline-prewarning-if-scheduled t ; but don’t warn before deadline if alreadyy scheduled
org-agenda-skip-scheduled-if-done t
org-agenda-start-on-weekday 1) ; weeks start on Monday
org-agenda-skip-deadline-if-done t
org-agenda-use-time-grid nil ; toggle it with G when needed
org-agenda-start-on-weekday 1 ; weeks start on Monday
org-stuck-projects '("+encours+LEVEL=1/-DONE" ("*") nil ""))
(defun vic/toggle-agenda-file-set ()
(interactive)
(if (equal org-agenda-files "~/notes/.agenda_files_notes")
(setq org-agenda-files "~/org/.agenda_files_gtd")
(setq org-agenda-files "~/notes/.agenda_files_notes"))
(message "Using %s" org-agenda-files))
(global-set-key (kbd "C-×") 'vic/toggle-agenda-file-set)
;;;; Calendar
;; Localize calendar for French. Cf https://www.emacswiki.org/emacs/CalendarLocalization#toc9
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment