# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1120444777 0
# Node ID ba3f24a57b734598c09f055dc292be46bb7acecb
# Parent  f0f7996ea325197746200e4cfc7d3015e2bf5223
(calc): Finish `defgroup' description with period.
(math-format-stack-value): "?\ " -> "?\s".

diff -r f0f7996ea325 -r ba3f24a57b73 lisp/calc/calc.el
--- a/lisp/calc/calc.el	Mon Jul 04 02:37:40 2005 +0000
+++ b/lisp/calc/calc.el	Mon Jul 04 02:39:37 2005 +0000
@@ -207,7 +207,7 @@
 (require 'calc-macs)
 
 (defgroup calc nil
-  "GNU Calc"
+  "GNU Calc."
   :prefix "calc-"
   :tag    "Calc"
   :group  'applications)
@@ -3026,10 +3026,10 @@
     (setq w (cdr off)
 	  off (car off))
     (when (> off 0)
-      (setq c (math-comp-concat (make-string off ? ) c)))
+      (setq c (math-comp-concat (make-string off ?\s) c)))
     (or (equal calc-left-label "")
 	(setq c (math-comp-concat (if (eq a 'top-of-stack)
-				      (make-string (length calc-left-label) ? )
+				      (make-string (length calc-left-label) ?\s)
 				    calc-left-label)
 				  c)))
     (when calc-line-numbering
@@ -3044,7 +3044,7 @@
       (require 'calc-ext)
       (setq c (list 'horiz c
 		    (make-string (max (- w (math-comp-width c)
-					 (length calc-right-label)) 0) ? )
+					 (length calc-right-label)) 0) ?\s)
 		    '(break -1)
 		    calc-right-label)))
     (setq s (if (stringp c)