From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 26 Dec 2006 02:54:41 +0000 (+0000)
Subject: (fill-paragraph): Check for a minibuffer
X-Git-Tag: emacs-pretest-22.0.93~413
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c98f736548d205b78f2a9c11543da6c7d8d99759;p=emacs.git

(fill-paragraph): Check for a minibuffer
rather than for being in a minibuffer window.
---

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 3fec7a31b9f..e3250a6f710 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -762,7 +762,7 @@ If `fill-paragraph-function' is nil, return the `fill-prefix' used for filling."
 		 (list (if current-prefix-arg 'full))))
   ;; First try fill-paragraph-function.
   (or (and (or fill-paragraph-function
-	       (and (window-minibuffer-p (selected-window))
+	       (and (minibufferp (current-buffer))
 		    (= 1 (point-min))))
 	   (let ((function (or fill-paragraph-function
 			       ;; In the minibuffer, don't count the width