1 files changed, 1 insertions, 2 deletions

diff --git a/lisp/ses.el b/lisp/ses.el
index 9221476e7a1..4c19c70c5da 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -1254,8 +1254,7 @@ preceding cell has spilled over."
          ((< len width)
           ;; Fill field to length with spaces.
           (setq len  (make-string (- width len) ?\s)
-                text (if (or (stringp value)
-                             (eq ses-call-printer-return t))
+                text (if (eq ses-call-printer-return t)
                          (concat text len)
                        (concat len text))))
          ((> len width)