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

[Emacs] Fix imalison:org-people-associated-states mutation bug in imalison:state-relevant-to

Browse Source
This commit is contained in:
Ivan Malison 2023-09-13 18:06:29 -06:00
parent 3afb8b6f0a
commit c9edb55cd4
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
dotfiles/emacs.d/org-config.org
View File

@ -325,8 +325,10 @@ We're going to use this to write separate parts of our config to different secti
state (cdr (assoc person imalison:org-people-associated-states)))) state (cdr (assoc person imalison:org-people-associated-states))))
(defun imalison:state-relevant-to (state person) (defun imalison:state-relevant-to (state person)
(not (member state (not
(mapcan 'cdr (--filter (not (equal (car it) person)) (member
state
(--mapcat it (--filter (not (equal (car it) person))
imalison:org-people-associated-states))))) imalison:org-people-associated-states)))))
(defun org-agenda-states-filter (state &optional marker) (defun org-agenda-states-filter (state &optional marker)