# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 797500959 0
# Node ID 4be78e93d1be867e7d7381e81b3898201a707111
# Parent  74046c14a0adab0bffc16df48d8cb487196b088a
(fill-region-as-paragraph): Undo previous change.
Instead, set JUSTIFY to `full' in the interactive spec.

diff -r 74046c14a0ad -r 4be78e93d1be lisp/textmodes/fill.el
--- a/lisp/textmodes/fill.el	Mon Apr 10 08:00:16 1995 +0000
+++ b/lisp/textmodes/fill.el	Mon Apr 10 08:02:39 1995 +0000
@@ -134,7 +134,8 @@
 
 If `sentence-end-double-space' is non-nil, then period followed by one
 space does not end a sentence, so don't break a line there."
-  (interactive "r\nP")
+  (interactive (list (region-beginning) (region-end)
+		     (if current-prefix-arg 'full)))
   ;; Arrange for undoing the fill to restore point.
   (if (and buffer-undo-list (not (eq buffer-undo-list t)))
       (setq buffer-undo-list (cons (point) buffer-undo-list)))
@@ -335,9 +336,9 @@
 	      ;; Justify the line just ended, if desired.
 	      (if justify
 		  (if (eobp)
-		      (justify-current-line (not (null justify)) t t)
+		      (justify-current-line justify t t)
 		    (forward-line -1)
-		    (justify-current-line (not (null justify)) nil t)
+		    (justify-current-line justify nil t)
 		    (forward-line 1))))))
 	;; Leave point after final newline.
 	(goto-char (point-max)))