cspark
/
Emacs-Configuration-Modern
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Org configuration changes

This commit is contained in:
Curt Spark 2026-04-04 02:12:22 +01:00
parent 939d22139f
commit ae88fd95b7
1 changed files with 41 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

80
init.el
View File

@ -180,53 +180,55 @@
(org-agenda-day-view))) (org-agenda-day-view)))
;For Org-Agenda, you can set a location of your Org Agenda file here. Set Agenda Directory: ;For Org-Agenda, you can set a location of your Org Agenda file here. Set Agenda Directory:
(use-package org (use-package org
;:ensure (:wait t) :ensure nil
:ensure nil :demand t ; Setting org mode to be deferred absolutely breaks everything, with org-agenda-mode-map error. Please switch to eval after load maybe instead.
:demand t :hook
:after evil (org-agenda-mode . (lambda() (org-agenda-entry-text-mode 1)))
:hook :config
(org-agenda-mode . (lambda() (org-agenda-entry-text-mode 1))) (setq org-agenda-files '("~/Nextcloud/Agenda"))
:bind ;This is will integrate the Calendar/Diary into Org-Agenda, so you can get access to dates on public holidays etc. Set diary to true:
(:map org-agenda-mode-map (setq org-agenda-include-diary t)
("C-j" . evil-next-line) ;Ensure done date/closed timestamps are logged
("C-k" . evil-previous-line) (setq org-log-done 'time)
("d" . org-agenda-toggle-day-view) ;Ensure state changes are logged into logbook
:map evil-normal-state-map (setq org-log-into-drawer "LOGBOOK")
("U" . undo-redo))
:config
(setq org-agenda-files '("~/Nextcloud/Agenda"))
;This is will integrate the Calendar/Diary into Org-Agenda, so you can get access to dates on public holidays etc. Set diary to true:
(setq org-agenda-include-diary t)
;Ensure done date/closed timestamps are logged
(setq org-log-done 'time)
;Ensure state changes are logged into logbook
(setq org-log-into-drawer "LOGBOOK")
;Ensure agenda still shows DONE items ;Ensure agenda still shows DONE items
(setq org-agenda-skip-scheduled-if-done nil) (setq org-agenda-skip-scheduled-if-done nil)
(setq agenda-skip-deadline-if-done nil) (setq agenda-skip-deadline-if-done nil)
;Fold settings ;Fold settings
;Org Mode historically used overlays to hide text, but newer versions moved toward text properties for better performance in large files. This change occasionally causes "stuck" visibility where sub-headers remain hidden until the parent is fully cycled. ;Org Mode historically used overlays to hide text, but newer versions moved toward text properties for better performance in large files. This change occasionally causes "stuck" visibility where sub-headers remain hidden until the parent is fully cycled.
(setq org-fold-core-style 'overlays) (setq org-fold-core-style 'overlays)
(setq org-startup-folded t) (setq org-startup-folded t)
(setq org-hide-emphasis-markers nil)) (setq org-hide-emphasis-markers nil))
(with-eval-after-load 'org
(with-eval-after-load 'evil
; Unbind stubborn org mode bindings
(define-key org-mode-map (kbd "M-h") nil)
(define-key org-mode-map (kbd "M-l") nil)
(evil-define-key* '(normal) org-mode-map (kbd "M-h") nil)
(evil-define-key* '(normal) org-mode-map (kbd "M-l") nil)))
(with-eval-after-load 'org-agenda
(define-key org-agenda-mode-map (kbd "C-j") 'evil-next-line)
(define-key org-agenda-mode-map (kbd "C-k") 'evil-previous-line)
(define-key org-agenda-mode-map "d" 'org-agenda-toggle-day-view)
(define-key org-agenda-mode-map "p" 'org-pomodoro))
; For Org Pomodoro notification sound ; For Org Pomodoro notification sound
(use-package sound-wav (use-package sound-wav
:ensure t) :ensure t)
; Org Pomodoro ; Org Pomodoro
(use-package org-pomodoro (use-package org-pomodoro
:ensure t :ensure t
:after org :after (org sound-wav)
:defer t :config
:config (setq org-pomodoro-manual-break t)
(setq org-pomodoro-manual-break t) (setq org-pomodoro-keep-killed-pomodoro-time t)
(setq org-pomodoro-keep-killed-pomodoro-time t) (setq org-pomodoro-play-sounds t)
(setq org-pomodoro-play-sounds t) (setq org-pomodoro-ticking-sound-p nil)
(setq org-pomodoro-ticking-sound-p nil) (setq org-pomodoro-audio-player "mpv"))
(setq org-pomodoro-audio-player "mpv"))
(defun sound-alert (alert) (defun sound-alert (alert)
"Play a sound notification and show message ALERT." "Play a sound notification and show message ALERT."