comparison lisp/woman.el @ 69793:93d87ad179a4

* man.el (Man-mode-map): Restore the \r binding. (Man-abstract-xref-man-page): If Man-target-string is a function, call it. (Man-highlight-references): Use Man-default-man-entry to get the target. Deal with xrefs too. (Man-highlight-references0): Don't call the target function. * woman.el (WoMan-xref-man-page): Strip the section number, woman cannot deal with it.

69792:06c899cdd0b6

(require 'man)
(require 'button)
(define-button-type 'WoMan-xref-man-page 
  :supertype 'Man-abstract-xref-man-page
  'func 'woman)

(eval-when-compile			; to avoid compiler warnings
  (require 'dired)
  (require 'apropos))

69793:93d87ad179a4

(require 'man)
(require 'button)
(define-button-type 'WoMan-xref-man-page 
  :supertype 'Man-abstract-xref-man-page
  'func (lambda (arg)
	  (woman
	   ;; `woman' cannot deal with arguments that contain a
	   ;; section name, like close(2), so strip the section name.
	   (if (string-match Man-reference-regexp arg)
	       (subqstring arg 0 (match-end 1))
	     arg))))

(eval-when-compile			; to avoid compiler warnings
  (require 'dired)
  (require 'apropos))