From 62f72ce03a4aedf49d046b9035c2e6f53d161692 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 9 Nov 1994 05:52:20 +0000 Subject: [PATCH] (emerge-file-names): Set help-mode in *Help* buffer. [commented out] (describe-mode): Likewise. --- lisp/emerge.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/emerge.el b/lisp/emerge.el index f3a7b25f6b5..ec316c76554 100644 --- a/lisp/emerge.el +++ b/lisp/emerge.el @@ -2148,7 +2148,10 @@ Use C-u l to reset the windows afterward." (princ "Ancestor buffer is: ") (princ (buffer-name)))) (princ "\n"))) - (princ emerge-output-description)))) + (princ emerge-output-description) + (save-excursion + (set-buffer standard-output) + (help-mode))))) (defun emerge-join-differences (arg) "Join the selected difference with the following one. @@ -2989,6 +2992,9 @@ If some prefix of KEY has a non-prefix definition, it is redefined." ;; minor-mode indicator)) ;; (princ (documentation minor-mode))))) ;; (setq minor-modes (cdr minor-modes)))) +;; (save-excursion +;; (set-buffer standard-output) +;; (help-mode)) ;; (print-help-return-message))) ;; This goes with the redefinition of describe-mode. -- 2.39.5