avy.el: Improve defcustom :type

* avy.el (avy-keys-alist):
(avy-styles-alist): Add 'function as a possible key-type.
This commit is contained in:
Oleh Krehel 2016-03-26 09:46:03 +01:00
parent 3b75d9520d
commit 9e61f786d8

9
avy.el
View File

@ -63,7 +63,8 @@ non-printing key like an arrow key (left, right, up, down). For
non-printing keys, a corresponding entry in
`avy-key-to-char-alist' must exist in order to visualize the key
in the avy overlays."
:type '(repeat :tag "Keys" (choice (character :tag "char")
:type '(repeat :tag "Keys" (choice
(character :tag "char")
(symbol :tag "non-printing key"))))
(defcustom avy-keys-alist nil
@ -80,7 +81,8 @@ in the avy overlays."
(const avy-goto-word-1)
(const avy-copy-line)
(const avy-copy-region)
(const avy-move-line))
(const avy-move-line)
(function :tag "Other command"))
:value-type (repeat :tag "Keys" character)))
(defcustom avy-style 'at-full
@ -108,7 +110,8 @@ If the commands isn't on the list, `avy-style' is used."
(const avy-goto-word-1)
(const avy-copy-line)
(const avy-copy-region)
(const avy-move-line))
(const avy-move-line)
(function :tag "Other command"))
:value-type (choice
(const :tag "Pre" pre)
(const :tag "At" at)