(do-auto-fill): justification renamed to current-justification.

diff --git a/lisp/simple.el b/lisp/simple.el
index 40845d0c10ce447464efd2e7dfbf53d57b2c67ae..a42ce3b35b7580e598ed5613138158c91e9bdb8d 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2163,7 +2163,7 @@ Setting this variable automatically makes it local to the current buffer.")
 
 (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))))