Fix local printer set to left aligned string formatter.

* lisp/ses.el (ses-local-printer-compile): Add missing case
for left-aligned string formatter.

diff --git a/lisp/ses.el b/lisp/ses.el
index ab9f0715fd8a55d4cc009cc01e55cc21c5de5923..0b38af41a8b8fb4ef367f8c541330795d712b086 100644 (file)
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -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)