accept character object as the same as list of characters.
(let ((lbs (concat "\n" (make-string (current-column) ?\ )))
separator cell sources required-features
ret)
(let ((lbs (concat "\n" (make-string (current-column) ?\ )))
separator cell sources required-features
ret)
+ (if (characterp value)
+ (setq value (list value)))
(while (consp value)
(setq cell (car value))
(if (integerp cell)
(while (consp value)
(setq cell (car value))
(if (integerp cell)