bug#53537: Emacs 28 regression: fill-column is not always respected for the first line of commented block

[Eli Zaretskii]

> Date: Wed, 26 Jan 2022 00:14:21 +0000
> From: Sergey Vinokurov <serg.foo@gmail.com>
> 
> The #45720 bug introduces edge case in treatment of fill-column for the 
> first line of commented block. This is caught by haskell-mode tests 
> (https://github.com/haskell/haskell-mode/blob/master/tests/haskell-mode-tests.el#L330)
>  
> but is not limited to that mode.
> 
> I have managed to reproduce it using the following snippet:
> 
> (princ
>   (with-temp-buffer
>     (asm-mode)
>     (dolist (line '("  ;; a b c"
>                     "  ;; d e f"
>                     "  ;; x y z"
>                     "  ;; w"))
>       (insert line "\n"))
>     (goto-char (point-min))
>     (end-of-line)
>     (setf fill-column 10)
>     (fill-paragraph nil)
>     (buffer-string)))
> 
> The idea is that everything is already filled and nothing should happen 
> when fill-column equals to 10.

Lars, do we revert the fix for bug#45720, or is there a better idea?