Re: man.el

[Kevin Rodgers]

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