emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/help.el


From: Richard M. Stallman
Subject: [Emacs-diffs] Changes to emacs/lisp/help.el
Date: Fri, 12 Jul 2002 18:57:12 -0400

Index: emacs/lisp/help.el
diff -c emacs/lisp/help.el:1.250 emacs/lisp/help.el:1.251
*** emacs/lisp/help.el:1.250    Wed May  1 12:40:39 2002
--- emacs/lisp/help.el  Fri Jul 12 18:57:11 2002
***************
*** 98,103 ****
--- 98,105 ----
  (autoload 'finder-by-keyword "finder"
    "Find packages matching a given keyword." t)
  
+ (define-key help-map "r" 'info-emacs-manual)
+ 
  (define-key help-map "s" 'describe-syntax)
  
  (define-key help-map "t" 'help-with-tutorial)
***************
*** 123,130 ****
  
  (defun print-help-return-message (&optional function)
    "Display or return message saying how to restore windows after help command.
! Computes a message and applies the optional argument FUNCTION to it.
! If FUNCTION is nil, applies `message' to it, thus printing it."
    (and (not (get-buffer-window standard-output))
         (let ((first-message
              (cond ((special-display-p (buffer-name standard-output))
--- 125,133 ----
  
  (defun print-help-return-message (&optional function)
    "Display or return message saying how to restore windows after help command.
! This function assumes that `standard-output' is the help buffer.
! It computes a message, and applies the optional argument FUNCTION to it.
! If FUNCTION is nil, it applies `message', thus displaying the message."
    (and (not (get-buffer-window standard-output))
         (let ((first-message
              (cond ((special-display-p (buffer-name standard-output))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]