+ :type '(alist :key-type symbol :tag "Charset"
+ :value-type
+ (list (list
+ (choice :tag "Font type"
+ (const normal)
+ (const bold)
+ (const italic)
+ (const bold-italic))
+ (choice :tag "Font source"
+ (const builtin)
+ (const bdf)
+ (const vflib)
+ (const nil))
+ ;; My guess as to what the doc is trying to say...
+ (choice :tag "Font name"
+ (const nil)
+ string
+ (repeat :tag "List" string))
+ (choice :tag "Encoding"
+ (const nil)
+ coding-system
+ function)
+ (choice :tag "Bytes"
+ (const nil)
+ (const 1)
+ (const 2)))))