# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 797234557 0
# Node ID a8c9d37ebe90fef7f6891e9f789510dacca95393
# Parent  c7f6b5b57b71e062e2dfdf66a48b134ddf3d22db
(fill-region-as-paragraph): If JUSTIFY is non-nil,
pass t to justify-current-line.

diff -r c7f6b5b57b71 -r a8c9d37ebe90 lisp/textmodes/fill.el
--- a/lisp/textmodes/fill.el	Fri Apr 07 05:46:47 1995 +0000
+++ b/lisp/textmodes/fill.el	Fri Apr 07 06:02:37 1995 +0000
@@ -335,9 +335,9 @@
 	      ;; Justify the line just ended, if desired.
 	      (if justify
 		  (if (eobp)
-		      (justify-current-line justify t t)
+		      (justify-current-line (not (null justify)) t t)
 		    (forward-line -1)
-		    (justify-current-line justify nil t)
+		    (justify-current-line (not (null justify)) nil t)
 		    (forward-line 1))))))
 	;; Leave point after final newline.
 	(goto-char (point-max)))