From b0d6450266b4c95afd3d7f03ad56b71edf30a8a0 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Thu, 27 Jun 2002 16:10:23 +0000 Subject: [PATCH] (describe-function-1): Use semicolon instead of dot. (describe-variable): Likewise. --- lisp/help-fns.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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."))) -- 2.39.2