From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 23 Jul 2021 13:56:44 +0000 (+0200)
Subject: Fix do-auto-fill thinko introduced earlier today
X-Git-Tag: emacs-28.0.90~1734
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6ce2acdadb7467fbde01f3d0648acea158836614;p=emacs.git

Fix do-auto-fill thinko introduced earlier today

* lisp/simple.el (do-auto-fill): `current-fill-column' returns nil
to signal that we should fill.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index ee2698dc674..1a49fe24252 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -8057,7 +8057,7 @@ Returns t if it really did any work."
   (let (fc justify give-up
 	   (fill-prefix fill-prefix))
     (if (or (not (setq justify (current-justification)))
-	    (setq fc (current-fill-column))
+	    (null (setq fc (current-fill-column)))
 	    (and (eq justify 'left)
 		 (<= (current-column) fc))
 	    (and auto-fill-inhibit-regexp