Re: man.el

[Kevin Rodgers <ihs_4664@yahoo.com>]

Richard Stallman wrote:
 > Regarding the change below, why is the current window's width more
 > likely to be correct than the frame's width?  (Neither one is
 > guaranteed to be right.)

If you try to guess based on the value of Man-notify-method (which
defaults to friendly), it looks like window-width is at least as likely
to be correct (disregarding special-display-regexps etc.):

(defun Man-window-width ()
   "Return the expected width of the window used to display Un*x manual pages.
See `Man-notify-method'."
   ;; see Man-notify-when-ready:
   (cond ((eq Man-notify-method 'newframe) ; make-frame
	 (or (assq 'width Man-frame-parameters)
	     (assq 'width default-frame-alist)
	     (frame-width)))
	((eq Man-notify-method 'pushy)	; switch-to-buffer
	 (window-width))
	((eq Man-notify-method 'bully)	; pop-to-buffer, delete-other-windows
	 (frame-width))
	((and (eq Man-notify-method 'aggressive) ; pop-to-buffer
	      pop-up-frames)
	 (or (assq 'width pop-up-frame-alist)
	     (assq 'width default-frame-alist)
	     (frame-width)))
	((memq Man-notify-method '(aggressive friendly)) ; display-buffer
	 ;; here we ignore special-display-regexps etc.
	 (window-width))
	((memq Man-notify-method '(polite quiet meek)) ; ?
	 ;; depends on how the user chooses to display the buffer, e.g
	 ;; C-x b, C-x 4 b, C-x 5 b
	 (window-width))
	(t				; same as meek
	 (window-width))))

-- 
Kevin Rodgers