From b7ad053cb40f3287c1e1ce9be33691da314a095f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 11 Aug 1998 11:15:58 +0000 Subject: [PATCH] (list-faces-display): Call print-help-return-message. (describe-face): Likewise. --- lisp/faces.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/faces.el b/lisp/faces.el index e4a10a115e1..4a7d951aeac 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1138,7 +1138,8 @@ selected frame." (while (not (eobp)) (insert " ") (forward-line 1)))) - (goto-char (point-min)))) + (goto-char (point-min))) + (print-help-return-message)) ;; If the *Faces* buffer appears in a different frame, ;; copy all the face definitions from FRAME, ;; so that the display will reflect the frame that was selected. @@ -1168,7 +1169,8 @@ selected frame." (let ((doc (face-documentation face))) (if doc (princ doc) - (princ "not documented as a face."))))) + (princ "not documented as a face."))) + (print-help-return-message))) ;;; Setting a face based on a SPEC. -- 2.39.5