# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 790489615 0
# Node ID 3eb77f03f53eb4af31ba25c1b280d7385498f549
# Parent  954a7f765673b8fc77d683d14ede0305edabe8f2
(do-auto-fill): justification renamed to current-justification.

diff -r 954a7f765673 -r 3eb77f03f53e lisp/simple.el
--- a/lisp/simple.el	Thu Jan 19 04:26:35 1995 +0000
+++ b/lisp/simple.el	Thu Jan 19 04:26:55 1995 +0000
@@ -2163,7 +2163,7 @@
 
 (defun do-auto-fill ()
   (let (fc justify bol give-up)
-    (if (or (not (setq justify (justification)))
+    (if (or (not (setq justify (current-justification)))
 	    (and (setq fc (current-fill-column)) ; make sure this gets set
 		 (eq justify 'left)
 		 (<= (current-column) (setq fc (current-fill-column))))