mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-26 01:40:53 -08:00
Code Issues Projects Releases Wiki Activity

(man-follow): New function.

Browse source 
(Man-mode-map): Bind it.
This commit is contained in:
Karl Heuer 1997-03-01 17:45:36 +00:00
parent bec1289c6f
commit e7bf8d10cd
1 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/man.el
View file

@ -309,6 +309,7 @@ This regular expression should start with a `^' character.")
(define-key Man-mode-map "k" 'Man-kill)
(define-key Man-mode-map "q" 'Man-quit)
(define-key Man-mode-map "m" 'man)
(define-key Man-mode-map "\r" 'man-follow)
(define-key Man-mode-map "?" 'describe-mode)
)
@ -523,6 +524,14 @@ If a buffer already exists for this man page, it will display immediately."
(Man-getpage-in-background man-args))
;;;###autoload
(defun man-follow (man-args)
"Get a Un*x manual page of the item under point and put it in a buffer."
(interactive (list (Man-default-man-entry)))
(if (or (not man-args)
(string= man-args ""))
(error "No item under point")
(man man-args)))
(defun Man-getpage-in-background (topic)
"Uses TOPIC to build and fire off the manpage and cleaning command."