aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero <[email protected]>2002-06-27 16:10:23 +0000
committerJuanma Barranquero <[email protected]>2002-06-27 16:10:23 +0000
commitb0d6450266b4c95afd3d7f03ad56b71edf30a8a0 (patch)
treea60f087288ef35ccf42122268d2ef251426603ed
parent92e306372a63085058a78c4eab344da395a2bbf1 (diff)
(describe-function-1): Use semicolon instead of dot.
(describe-variable): Likewise.
-rw-r--r--lisp/help-fns.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index da62d72b7e..f62443ef15 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.")))