calc mode line touch up

* lisp/calc/calc.el (calc-set-mode-line): Don't put excessive
white space in mode line (bug#18079).

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 3a9a2804cf261fe52d949becbb482d3a9f96d14c..8e7629627353fae84d11feed3fb8b514acfd480a 100644 (file)
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1663,7 +1663,7 @@ See calc-keypad for details."
     (let* ((fmt (car calc-float-format))
           (figs (nth 1 calc-float-format))
           (new-mode-string
-           (format "Calc%s%s: %d %s %-14s"
+           (format "Calc%s%s: %d %s %s"
                    (if (and calc-embedded-info
                              (eq (aref calc-embedded-info 1) (current-buffer)))
                         "Embed" "")