[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Links in WoMan buffer should not call `man'
From: |
Chong Yidong |
Subject: |
Re: Links in WoMan buffer should not call `man' |
Date: |
Fri, 25 Aug 2006 18:14:04 -0400 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
Reiner Steib <address@hidden> writes:
> Hi,
>
> in GNU Emacs 22.0.50.3 (i686-pc-linux-gnu, GTK+ Version 2.8.3) of
> 2006-08-24 on viandante, following manual links in WoMan buffers
> should create new WoMan buffers, not new man buffers.
This hack should fix it.
*** emacs/lisp/woman.el.~1.44.~ 2006-04-17 18:12:14.000000000 -0400
--- emacs/lisp/woman.el 2006-08-25 18:12:59.000000000 -0400
***************
*** 1750,1756 ****
(define-key woman-mode-map [M-mouse-2] 'woman-follow-word)
;; We don't need to call `man' when we are in `woman-mode'.
! (define-key woman-mode-map [remap man] 'woman))
(defun woman-follow-word (event)
"Run WoMan with word under mouse as topic.
--- 1750,1767 ----
(define-key woman-mode-map [M-mouse-2] 'woman-follow-word)
;; We don't need to call `man' when we are in `woman-mode'.
! (define-key woman-mode-map [remap man] 'woman)
! (define-key woman-mode-map [remap man-follow] 'woman-follow))
!
! (defun woman-follow (topic)
! "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 topic)
! (string= topic ""))
! (error "No item under point")
! (woman (if (string-match Man-reference-regexp topic)
! (substring topic 0 (match-end 1))
! topic))))
(defun woman-follow-word (event)
"Run WoMan with word under mouse as topic.