summaryrefslogtreecommitdiff
path: root/helm-types.el
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2019-12-09 14:05:39 +0100
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2019-12-09 14:05:39 +0100
commitc9aea81bf69b95d67ed96cc341e4613810c1f221 (patch)
treec5bdcb9dc4cac2dced1fb1be5d861a46aa70b896 /helm-types.el
parentdf3658c02ad77fc4de0418c77e966324356e9156 (diff)
Use symbol as value-type for some alists
* helm-types.el (helm-type-function-actions): Do it. (helm-type-command-actions): Do it.
Diffstat (limited to 'helm-types.el')
-rw-r--r--helm-types.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/helm-types.el b/helm-types.el
index 0e075099..9e476cfb 100644
--- a/helm-types.el
+++ b/helm-types.el
@@ -225,7 +225,9 @@
"Untrace function" 'untrace-function)
"Default actions for type functions."
:group 'helm-elisp
- :type '(alist :key-type string :value-type function))
+ ;; Use symbol as value type because some functions may not be
+ ;; autoloaded (like untrace-function).
+ :type '(alist :key-type string :value-type symbol))
(defmethod helm-source-get-action-from-type ((object helm-type-function))
(slot-value object 'action))
@@ -262,7 +264,7 @@
(helm-actions-from-type-function)))
"Default actions for type command."
:group 'helm-command
- :type '(alist :key-type string :value-type function))
+ :type '(alist :key-type string :value-type symbol))
(defmethod helm--setup-source :primary ((_source helm-type-command)))