jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix: (org-ql-search) Group completion when osa not installed

Browse source
This commit is contained in:
Adam Porter 2019-09-06 05:26:18 -05:00
parent 57cad50761
commit bf20251e93
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
org-ql-agenda.el
View file

@ -228,8 +228,9 @@ TITLE: An optional string displayed in the header."
:groups (pcase (completing-read "Group by: " :groups (pcase (completing-read "Group by: "
(append (list "Don't group" (append (list "Don't group"
"Global groups") "Global groups")
(cl-loop for type in org-super-agenda-auto-selector-keywords (when (bound-and-true-p org-super-agenda-auto-selector-keywords)
collect (substring (symbol-name type) 6)))) (cl-loop for type in org-super-agenda-auto-selector-keywords
collect (substring (symbol-name type) 6)))))
("Global groups" org-super-agenda-groups) ("Global groups" org-super-agenda-groups)
("Don't group" nil) ("Don't group" nil)
(property (list (list (intern (concat ":auto-" property)))))) (property (list (list (intern (concat ":auto-" property))))))