From 7f7137e96dd91786e0cf5c8ecb674aeaaf22a49d Mon Sep 17 00:00:00 2001 From: Jonas Bernoulli Date: Tue, 16 Jan 2024 20:41:55 +0100 Subject: [PATCH] epkg-list-columns: Fix custom type Closes #45. --- lisp/epkg-list.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/lisp/epkg-list.el b/lisp/epkg-list.el index c314dec..b6b8d2f 100644 --- a/lisp/epkg-list.el +++ b/lisp/epkg-list.el @@ -81,18 +81,18 @@ should be `epkg-list-sort-by-stars'." (choice :tag "Sort predicate" (const :tag "don't sort" nil) (const :tag "default" t) - (function)) - (repeat :tag "Properties" - (list (choice :tag "Property" - (const :right-align) - (const :pad-right) - (symbol)) - (sexp :tag "Value"))) + function) + (plist :tag "Properties" + :key-type (choice :tag "Property" + (const :right-align) + (const :pad-right) + (symbol)) + :value-type (sexp :tag "Value")) (choice :tag "Slot symbol" ,@epkg--custom-slot-choices) (choice :tag "Format value" (const :tag "as is" nil) (const epkg-list-format-name) - (function))))) + function)))) (defcustom epkg-list-mode-hook '(hl-line-mode) "Hook run after entering Epkg-List mode."