# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1025194223 0
# Node ID 860693575c7de8f4aaa03b6523ee83f3099638d7
# Parent  06ea4b707bb268a26bbb13fe697f816cc71e0329
(describe-function-1): Use semicolon instead of dot.
(describe-variable): Likewise.

diff -r 06ea4b707bb2 -r 860693575c7d lisp/help-fns.el
--- a/lisp/help-fns.el	Thu Jun 27 16:09:51 2002 +0000
+++ b/lisp/help-fns.el	Thu Jun 27 16:10:23 2002 +0000
@@ -282,9 +282,9 @@
         (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 @@
 	      (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.")))