exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Utils] Improve definitions of custom helm sources

Browse Source 
Instead of giving a list, we now create the sources directly.  This gives us the
possibility to configure certain aspects of the sources like matching behavior
and highlighting.  Now we are much closer to the standard behavior of helm than
before.
This commit is contained in:
Daniel Borchmann 2019-08-30 19:47:25 +02:00
parent d28e51f5e6
commit 43ece81b2d
Signed by: exot
GPG Key ID: 1C7071A75BB72D64
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
site-lisp/db-utils.el
View File

@ -353,10 +353,10 @@ output, separated by \\n, when called with
;;; helm configuration
(defvar db/helm-source-frequently-used-features
'((name . "Frequently Used")
(candidates . db/frequently-used-features)
(action . (("Open" . funcall)))
(filtered-candidate-transformer . helm-adaptive-sort))
(helm-make-source "Frequently Used" 'helm-source-sync
:candidates #'db/frequently-used-features
:action '(("Open" . funcall))
:filtered-candidate-transformer #'helm-adaptive-sort)
"Helm source for `db/helm-frequently-used-features’.")
(defun db/important-documents ()
@ -399,10 +399,10 @@ path."
(start-process "" nil "xdg-open" path))))
(defvar db/helm-source-important-documents
'((name . "Important files")
(candidates . db/important-documents)
(action . (("Open externally" . db/system-open)
("Find file" . find-file))))
(helm-make-source "Important files" 'helm-source-sync
:candidates #'db/important-documents
:action '(("Open externally" . db/system-open)
("Find file" . find-file)))
"Helm source for important documents.")
(defun db/helm-shortcuts (arg)