Fix a bunch of custom types (thank you cus-test.el)

[gnu-emacs] / lisp / eshell / em-glob.el

diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el
index 5a21f463f0b3d3aab871f5e8a5019ce7ceac3564..866412d252b0446d50cf644ba4d86479a4fbff3b 100644 (file)
--- a/lisp/eshell/em-glob.el
+++ b/lisp/eshell/em-glob.el
@@ -119,7 +119,8 @@ This option slows down recursive glob processing by quite a bit."
                             "*" "+")) (+ pos 2))
               (cons "*" (1+ pos))))))
   "An alist for translation of extended globbing characters."
-  :type '(repeat (cons character (choice regexp function)))
+  :type '(alist :key-type character
+               :value-type (choice string function))
   :group 'eshell-glob)
 
 ;;; Functions: