fix(agenda): guard pdf-view advice on interactive calls; restructure super-agenda groups
This commit is contained in:
19
config.el
19
config.el
@@ -1127,7 +1127,8 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
|
||||
;; with org-agenda which triggers window-selection-change-functions internally.
|
||||
(defun my/pdf-view-ensure-normal-state (&rest _)
|
||||
"Activate evil-normal-state when landing on a pdf-view-mode buffer."
|
||||
(when (derived-mode-p 'pdf-view-mode)
|
||||
(when (and (derived-mode-p 'pdf-view-mode)
|
||||
(called-interactively-p 'any))
|
||||
(evil-normal-state)))
|
||||
|
||||
(advice-add 'evil-window-next :after #'my/pdf-view-ensure-normal-state)
|
||||
@@ -1223,15 +1224,21 @@ Otherwise: runs interactive ement-connect, then opens rooms after sync."
|
||||
:after org-agenda
|
||||
:config
|
||||
(setq org-super-agenda-groups
|
||||
'((:name "Dnes"
|
||||
'((:name "Kyndryl — dnes"
|
||||
:and (:tag ("kyndryl" "work") :scheduled today))
|
||||
(:name "Kyndryl — deadline"
|
||||
:and (:tag ("kyndryl" "work") :deadline t))
|
||||
(:name "Kyndryl"
|
||||
:tag ("kyndryl" "work"))
|
||||
(:name "ZTJ — dnes"
|
||||
:and (:tag "ztj" :scheduled today))
|
||||
(:name "ZTJ"
|
||||
:tag "ztj")
|
||||
(:name "Dnes"
|
||||
:scheduled today
|
||||
:deadline today)
|
||||
(:name "Cekam"
|
||||
:todo "WAIT")
|
||||
(:name "Kyndryl"
|
||||
:tag ("kyndryl" "work"))
|
||||
(:name "ZTJ"
|
||||
:tag "ztj")
|
||||
(:name "Ostatni"
|
||||
:anything t))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user