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

(describe-variable): Likewise.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index da62d72b7e7d2486977dca52d5bed6b7c2cb32b6..f62443ef152e6fcf2db9794460156b4a75753981 100644 (file)
--- 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.")))