colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[Emacs] Display custom times

Browse Source
This commit is contained in:
Ivan Malison 2023-08-18 17:01:29 -06:00
parent 01e3767eb5
commit a2888c02a2
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
dotfiles/emacs.d/README.org
View File

@ -3046,11 +3046,18 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877
org-edit-src-content-indentation 0 org-edit-src-content-indentation 0
org-src-preserve-indentation t) org-src-preserve-indentation t)
(defun imalison:set-display-custom-times ()
(setq org-display-custom-times t))
(setq org-goto-interface 'outline-path-completion (setq org-goto-interface 'outline-path-completion
org-goto-max-level 10 org-goto-max-level 10
org-export-headline-levels 3) org-export-headline-levels 3)
(add-hook 'org-mode-hook 'imalison:disable-linum-mode) (add-hook 'org-mode-hook 'imalison:disable-linum-mode)
(add-hook 'org-mode-hook (lambda () (setq org-todo-key-trigger t))) (add-hook 'org-mode-hook (lambda () (setq org-todo-key-trigger t)))
(add-hook 'org-mode-hook 'imalison:set-display-custom-times)
(add-hook 'org-agenda-mode-hook 'imalison:disable-linum-mode)
(add-hook 'org-agenda-mode-hook 'imalison:set-display-custom-times)
(add-hook 'org-agenda-mode-hook 'imalison:disable-linum-mode) (add-hook 'org-agenda-mode-hook 'imalison:disable-linum-mode)
(cl-defun imalison:org-time-condition-met-p (&key (property "CREATED") (days 30) (future nil)) (cl-defun imalison:org-time-condition-met-p (&key (property "CREATED") (days 30) (future nil))
@ -3171,12 +3178,6 @@ The following is taken from [[https://github.com/syl20bnr/spacemacs/blob/a650877
(setq org-todo-repeat-to-state "TODO") (setq org-todo-repeat-to-state "TODO")
(defun imalison:org-todo-save (&rest args)
(when (eq major-mode 'org-mode)
(save-buffer)))
(advice-add 'org-todo :after 'imalison:org-todo-save)
(setq org-agenda-span 10) (setq org-agenda-span 10)
(setq org-agenda-start-day "-2d") (setq org-agenda-start-day "-2d")