fixed agenda modeline and weird habit race condition
This commit is contained in:
parent
2c42c4580a
commit
4e019553f4
26
conf.org
26
conf.org
|
@ -741,16 +741,19 @@ This adds support for csv files. Almost makes them editable like a spreadsheet.
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
* org-mode
|
* org-mode
|
||||||
** low-level config
|
** low-level config
|
||||||
*** directory
|
|
||||||
I keep all my org files in one place.
|
|
||||||
#+BEGIN_SRC emacs-lisp
|
|
||||||
(setq org-directory "~/Org")
|
|
||||||
#+END_SRC
|
|
||||||
*** modules
|
*** modules
|
||||||
Org has several extensions in the form of loadable modules. =org-protocol= is used as a backend for external programs to communicate with =org-mode=. =org-habit= allows the habit todoitem which is used as a more flexible recurring task.
|
Org has several extensions in the form of loadable modules. =org-protocol= is used as a backend for external programs to communicate with =org-mode=. =org-habit= allows the habit todoitem which is used as a more flexible recurring task.
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(setq org-modules '(org-habit org-protocol))
|
(setq org-modules '(org-habit org-protocol))
|
||||||
|
(require 'org)
|
||||||
|
(require 'org-agenda)
|
||||||
(require 'org-protocol)
|
(require 'org-protocol)
|
||||||
|
(require 'org-habit)
|
||||||
|
#+END_SRC
|
||||||
|
*** directory
|
||||||
|
I keep all my org files in one place.
|
||||||
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
(setq org-directory "~/Org")
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** autosave
|
*** autosave
|
||||||
Save all org buffers 1 minute before the hour.
|
Save all org buffers 1 minute before the hour.
|
||||||
|
@ -1640,6 +1643,19 @@ This controls what each line on the block agenda looks like. This is reformated
|
||||||
(tags . " %-12:c %-5:e ")
|
(tags . " %-12:c %-5:e ")
|
||||||
(search . " %-12:c")))
|
(search . " %-12:c")))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
|
***** modeline
|
||||||
|
Hide the various modules that may be present
|
||||||
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
(defun nd/org-agenda-trim-modeline (orig-fn &rest args)
|
||||||
|
"Advice to remove extra information from agenda modeline name."
|
||||||
|
(let ((org-agenda-include-diary nil)
|
||||||
|
(org-agenda-include-deadlines nil)
|
||||||
|
(org-agenda-use-time-grid nil)
|
||||||
|
(org-habit-show-habits nil))
|
||||||
|
(apply orig-fn args)))
|
||||||
|
|
||||||
|
(advice-add #'org-agenda-set-mode-name :around #'nd/org-agenda-trim-modeline)
|
||||||
|
#+END_SRC
|
||||||
***** misc
|
***** misc
|
||||||
These are just some options to enable/disable some aesthetic things.
|
These are just some options to enable/disable some aesthetic things.
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
|
Loading…
Reference in New Issue