From 8a38e948b039516e70176ebe20c5349e2ade6ac5 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Vincent=20Bela=C3=AFche?= <vincentb1@users.sourceforge.net>
Date: Thu, 28 Jul 2016 19:49:37 +0200
Subject: [PATCH] Fix local printer set to left aligned string formatter.

* lisp/ses.el (ses-local-printer-compile): Add missing case
for left-aligned string formatter.
---
 lisp/ses.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lisp/ses.el b/lisp/ses.el
index ab9f0715fd8..0b38af41a8b 100644
--- 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)
-- 
2.39.2