diff --git a/global.org b/global.org index 21e1b62..d51025e 100644 --- a/global.org +++ b/global.org @@ -40,7 +40,7 @@ * Introduction ** ~setq~ vs ~setq-default~ - Some variables are buffer-local, others are not; for non buffer-local + Some variables are local, others are not; for non buffer-local variables the two commands are equivalent; for the buffer-local variables, setq acts on the current buffer, whereas setq-default sets the default value of the variable for buffers that do not have a local value. @@ -1009,7 +1009,7 @@ #+end_src ** org-mode *** Require - Require the ~org~ package; I also occasionally use org-pomodoro + Require the ~org~ package; #+begin_src emacs-lisp (with-eval-after-load "org" (define-key org-src-mode-map (kbd "C-c C-c") 'org-edit-src-exit) @@ -1128,7 +1128,7 @@ (setq org-use-speed-commands t) #+end_src Customize the agenda interface a bit - - newline before habits + - add a newline before habits #+begin_src emacs-lisp (defun wilder/insert-before-first (pred el list &optional base) "Returns a list in which EL is inserted before the first occurrence in LIST satisfying PRED" @@ -1174,7 +1174,7 @@ (setq list (org-agenda-limit-entries list 'org-hd-marker max-entries))) (when (and org-agenda-dim-blocked-tasks org-blocker-hook) (setq list (mapcar #'org-agenda--mark-blocked-entry list))) - + ; this bit adds a blank line before the first habit (setq list (wilder/insert-before-first #'(lambda (string) (get-text-property 0 'org-habit-p string)) @@ -1468,7 +1468,7 @@ "\n\n")) (narrow-to-region (point) (point-max))) (setq org-done-keywords-for-agenda nil) - ;; Setting any org variables that are in org-agenda-local-vars + ;; Setting any variables that are in org-agenda-local-vars ;; list need to be done after the prepare call (org-agenda-prepare-window (get-buffer-create org-agenda-buffer-name) filter-alist)