Re: infinite recursion in describe-mode

[Richard Stallman]

Does this fix it?

*** fill.el     24 Dec 2006 19:43:00 -0500      1.193
--- fill.el     25 Dec 2006 00:40:45 -0500      
***************
*** 762,768 ****
                 (list (if current-prefix-arg 'full))))
    ;; First try fill-paragraph-function.
    (or (and (or fill-paragraph-function
!              (and (window-minibuffer-p (selected-window))
                    (= 1 (point-min))))
           (let ((function (or fill-paragraph-function
                               ;; In the minibuffer, don't count the width
--- 762,768 ----
                 (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
                               ;; In the minibuffer, don't count the width