Fix local printer set to left aligned string formatter.

* lisp/ses.el (ses-local-printer-compile): Add missing case
for left-aligned string formatter.
This commit is contained in:
Vincent Belaïche 2016-07-28 19:49:37 +02:00
parent 0f0b191a53
commit 8a38e948b0

View file

@ -562,6 +562,10 @@ definition."
((functionp printer) printer)
((stringp printer)
`(lambda (x) (format ,printer x)))
((stringp (car-safe printer))
`(lambda (x)
(setq ses-call-printer-return t)
(format ,(car printer) x)))
(t (error "Invalid printer %S" printer))))
(defun ses--local-printer (name def)