Re: describe-mode problem if called with minibuffer window selected

[Richard Stallman]

Does this patch fix the remaining bug?

*** fill.el     10 Jan 2007 14:38:51 -0500      1.197
--- fill.el     18 Jan 2007 12:09:15 -0500      
***************
*** 761,767 ****
                 (barf-if-buffer-read-only)
                 (list (if current-prefix-arg 'full))))
    ;; First try fill-paragraph-function.
!   (or (and (or fill-paragraph-function
               (and (minibufferp (current-buffer))
                    (= 1 (point-min))))
           (let ((function (or fill-paragraph-function
--- 761,768 ----
                 (barf-if-buffer-read-only)
                 (list (if current-prefix-arg 'full))))
    ;; First try fill-paragraph-function.
!   (or (and (not (eq fill-paragraph-function t))
!          (or fill-paragraph-function
               (and (minibufferp (current-buffer))
                    (= 1 (point-min))))
           (let ((function (or fill-paragraph-function
***************
*** 773,779 ****
                 ;; fill-paragraph-handle-comment back to t explicitly or
                 ;; return nil.
                 (fill-paragraph-handle-comment nil)
!                fill-paragraph-function)
             (funcall function arg)))
        ;; Then try our syntax-aware filling code.
        (and fill-paragraph-handle-comment
--- 774,780 ----
                 ;; fill-paragraph-handle-comment back to t explicitly or
                 ;; return nil.
                 (fill-paragraph-handle-comment nil)
!                (fill-paragraph-function t))
             (funcall function arg)))
        ;; Then try our syntax-aware filling code.
        (and fill-paragraph-handle-comment