diff options
| author | Mountain Man <43313373+MountainMan1312@users.noreply.github.com> | 2023-07-10 22:53:50 -0400 |
|---|---|---|
| committer | Mountain Man <43313373+MountainMan1312@users.noreply.github.com> | 2023-07-10 22:53:50 -0400 |
| commit | 01d304144810bb1726f159a91b0ac39a5b0f1366 (patch) | |
| tree | 9c8158cb8969ed33662baaaf1934f58c6e97fc3b | |
| parent | Start Emacs with `--debug-init` (diff) | |
| download | mmosmacs-01d304144810bb1726f159a91b0ac39a5b0f1366.tar.gz mmosmacs-01d304144810bb1726f159a91b0ac39a5b0f1366.tar.bz2 mmosmacs-01d304144810bb1726f159a91b0ac39a5b0f1366.zip | |
Fix save org files before updating Agenda view
| -rw-r--r-- | init.el | 9 |
1 files changed, 7 insertions, 2 deletions
| @@ -1094,8 +1094,13 @@ | |||
| 1094 | (:discard (:anything t))))))))))) | 1094 | (:discard (:anything t))))))))))) |
| 1095 | 1095 | ||
| 1096 | ;; Save org files before updating Agenda view | 1096 | ;; Save org files before updating Agenda view |
| 1097 | (advice-add 'org-agenda-redo :before 'org-save-all-org-buffers) | 1097 | (defun mm/org-agenda-save-all-redo-all () |
| 1098 | (advice-add 'org-agenda-redo-all :before 'org-save-all-org-buffers) | 1098 | "" |
| 1099 | (interactive) | ||
| 1100 | (progn | ||
| 1101 | (org-save-all-org-buffers) | ||
| 1102 | (org-agenda-redo-all))) | ||
| 1103 | (define-key org-agenda-keymap (kbd "g") 'mm/org-agenda-save-all-redo-all) | ||
| 1099 | 1104 | ||
| 1100 | 1105 | ||
| 1101 | ;; Update agenda periodically every `mm/refresh-agenda-time-seconds' seconds. | 1106 | ;; Update agenda periodically every `mm/refresh-agenda-time-seconds' seconds. |