diff options
author | Marc Coquand <marc@mccd.space> | 2024-11-04 17:13:37 +0200 |
---|---|---|
committer | Marc Coquand <marc@mccd.space> | 2024-11-04 17:13:37 +0200 |
commit | 1b2cae9dd963351433dd7a0c19ae52283cf2e7dc (patch) | |
tree | 6151a9600fe87373b61893395b1e53557115b464 | |
parent | 514bf47c3c3ae79f7a72dd058f70dc01cc7b0e9c (diff) | |
download | guix-1b2cae9dd963351433dd7a0c19ae52283cf2e7dc.tar.gz guix-1b2cae9dd963351433dd7a0c19ae52283cf2e7dc.tar.bz2 guix-1b2cae9dd963351433dd7a0c19ae52283cf2e7dc.zip |
.
-rw-r--r-- | home/dots/.emacs | 30 |
1 files changed, 20 insertions, 10 deletions
diff --git a/home/dots/.emacs b/home/dots/.emacs index 2316f72..abc8abe 100644 --- a/home/dots/.emacs +++ b/home/dots/.emacs @@ -759,6 +759,10 @@ entry (file "~/personal-db/notes/todo.org") "* TODO %?\n%i\n%a\n " :empty-lines 1) + ("r" "Reminder" + entry (file "~/personal-db/notes/reminders.org") + "* %?\n%^T" + :empty-lines 1) ("l" "Log" entry (file+headline "~/personal-db/notes/log.org" "Log") "** %?\n%T" @@ -778,20 +782,23 @@ (global-set-key (kbd "C-c c") #'org-capture) (global-set-key (kbd "C-c j") #'org-goto) (global-set-key (kbd "C-c C-o") #'org-open-at-point-global) - (global-set-key (kbd "C-c C-s") #'sync-org) ;; Something errors out with capture logs and non-org files (add-to-list 'warning-suppress-log-types '(org-element)) (add-to-list 'warning-suppress-types '(org-element)) - (advice-add 'org-agenda-quit :before 'org-save-all-org-buffers) - (advice-add 'org-refile :after 'org-save-all-org-buffers) + (advice-add 'org-agenda-quit :before (lambda () + (interactive) + (org-save-all-org-buffers) + (sync-org))) + (advice-add 'org-refile :after (lambda () + (interactive) + (org-save-all-org-buffers) + (sync-org))) :hook ((org-mode . org-indent-mode) (org-mode . flyspell-mode) (org-mode . (lambda () (auto-revert-mode 1))) (org-mode . visual-line-mode) - (org-mode . (lambda () - (add-hook 'after-save-hook 'sync-org nil t))) (org-mode . variable-pitch-mode))) (use-package autorevert @@ -805,10 +812,11 @@ :config (setq appt-message-warning-time 15 appt-display-interval 5 - appt-disp-window-function (lambda (minutes-to now text) - (org-show-notification - (format "Appointment in %s minutes:\n%s" - minutes-to text)))) + appt-disp-window-function (lambda (remaining new-time msg) + (notifications-notify + :title (format "In %s minutes" remaining) + :body msg + :urgency 'critical))) (define-advice appt-activate (:after (&optional _arg) hold-your-horses) "`appt-activate' is too eager, rein it in." @@ -1034,7 +1042,7 @@ '(font-lock-keyword-face ((t ()))) '(font-lock-string-face ((t (:foreground "#111111" :slant italic)))) '(font-lock-type-face ((t (:foreground "#111111")))) - '(magit-section-heading ((t (:foreground "royalblue")))) + '(magit-section-heading ((t (:weight bold)))) '(font-lock-variable-name-face ((t (:foreground "#111111")))) '(fringe ((t ()))) '(header-line ((t (:inherit default :foreground "grey20" :box (:line-width (12 . 12) :color "#fffff8") :underline (:color "#e0e0e0" :style line :position 0) :family "Iosevka Aile")))) @@ -1060,6 +1068,8 @@ '(mode-line-emphasis ((t ()))) '(mode-line-buffer-id ((t ()))) '(magit-section-highlight ((t (:background "#EEEEE8")))) + '(magit-diff-file-heading-highlight ((t (:inherit magit-section-highlight)))) + '(magit-diff-file-heading ((t ()))) '(mode-line-inactive ((t (:inherit mode-line :background "#f9f9f3" :foreground "grey60" :overline "#f9f9f9" :underline (:color "#f9f9f9" :style line :position 0) :weight light)))) '(mu4e-header-highlight-face ((t (:inherit hl-line :extend t :weight bold)))) '(mu4e-header-key-face ((t (:weight bold)))) |