branch: elpa/flymake-collection commit 976ac70153a0a18da22e068c740c3394bec28545 Author: Valeriy Litkovskyy <vlr.ltk...@protonmail.com> Commit: GitHub <nore...@github.com>
cleanup: Fix defcustom type definitions (#11) --- src/checkers/flymake-collection-gcc.el | 4 ++-- src/flymake-collection-hook.el | 16 ++++++++++++++-- 2 files changed, 16 insertions(+), 4 deletions(-) diff --git a/src/checkers/flymake-collection-gcc.el b/src/checkers/flymake-collection-gcc.el index 91334ecde0..3a17b9e400 100644 --- a/src/checkers/flymake-collection-gcc.el +++ b/src/checkers/flymake-collection-gcc.el @@ -34,12 +34,12 @@ (defcustom flymake-collection-gcc-args '("-pedantic" "-pedantic-errors") "Command line arguments always passed to `flymake-collection-gcc'." - :type 'list + :type '(repeat :tag "Arguments" (string :tag "Argument")) :group 'flymake-collection) (defcustom flymake-collection-gcc-include-path nil "Default include path for gcc in `flymake-collection-gcc'." - :type 'list + :type '(repeat :tag "Paths" (string :tag "Path")) :group 'flymake-collection) ;;;###autoload (autoload 'flymake-collection-gcc "flymake-collection-gcc") diff --git a/src/flymake-collection-hook.el b/src/flymake-collection-hook.el index 3b0023d93d..e040123666 100644 --- a/src/flymake-collection-hook.el +++ b/src/flymake-collection-hook.el @@ -74,7 +74,19 @@ (notmuch-message-mode flymake-collection-proselint) (nxml-mode flymake-collection-xmllint)) "Configuration mapping major-modes to `flymake' backends." - :type 'list + :type '(alist + :key-type (symbol :tag "Mode") + :value-type + (repeat + :tag "Backends" + (choice + (symbol :tag "Backend") + (cons :tag "Backend with properties" + (symbol :tag "Backend") + (plist :tag "Properties" + :options ((:disabled boolean) + (:depth integer) + (:predicate function))))))) :group 'flymake-collection) (defcustom flymake-collection-config-inherit nil @@ -110,7 +122,7 @@ (defcustom flymake-collection-hook-ignore-modes nil "List of modes in which `flymake-collection-hook' is inhibited." - :type '(list symbol) + :type '(repeat :tag "Modes" (symbol :tag "Mode")) :group 'flymake-collection) (defun flymake-collection-hook-set-backends ()