From: Juanma Barranquero <lekktu@gmail.com>
Date: Thu, 27 Jun 2002 16:10:23 +0000 (+0000)
Subject: (describe-function-1): Use semicolon instead of dot.
X-Git-Tag: ttn-vms-21-2-B4~14411
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b0d6450266b4c95afd3d7f03ad56b71edf30a8a0;p=emacs.git

(describe-function-1): Use semicolon instead of dot.
(describe-variable): Likewise.
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index da62d72b7e7..f62443ef152 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -282,9 +282,9 @@ and the file name is displayed in the echo area."
         (terpri)
         (princ "This function is obsolete")
         (if (nth 2 obsolete) (princ (format " since %s" (nth 2 obsolete))))
-        (princ ".") (terpri)
+        (princ ";") (terpri)
         (princ (if (stringp (car obsolete)) (car obsolete)
-                 (format "Use `%s' instead." (car obsolete))))
+                 (format "use `%s' instead." (car obsolete))))
         (terpri)))
     (let ((doc (documentation function)))
       (if doc
@@ -432,9 +432,9 @@ it is displayed along with the global value."
 	      (when obsolete
 		(princ "This variable is obsolete")
 		(if (cdr obsolete) (princ (format " since %s" (cdr obsolete))))
-		(princ ".") (terpri)
+		(princ "; ") (terpri)
 		(princ (if (stringp (car obsolete)) (car obsolete)
-			 (format "Use `%s' instead." (car obsolete))))
+			 (format "use `%s' instead." (car obsolete))))
 		(terpri)))
 	    (let ((doc (documentation-property variable 'variable-documentation)))
 	      (princ (or doc "Not documented as a variable.")))