]> code.delx.au - gnu-emacs/blobdiff - lisp/align.el
Update docs for `customize-mode'
[gnu-emacs] / lisp / align.el
index da8e51cf120dff872b5b98dd797f7a0569f42ea7..f09f57032d44a737ba74f683a18c0d7339af2dc6 100644 (file)
@@ -893,11 +893,10 @@ on the format of these lists."
                       (or exclude-rules
                          align-mode-exclude-rules-list
                          align-exclude-rules-list)
-                     (function
-                      (lambda (b e mode)
-                        (when (and mode (listp mode))
-                          (setq sec-first (min sec-first b)
-                                sec-last  (max sec-last e))))))
+                      (lambda (b e mode)
+                        (when (consp mode)
+                          (setq sec-first (min sec-first b)
+                                sec-last  (max sec-last e)))))
        (if (< sec-first sec-last)
            (align-region sec-first sec-last 'entire
                          (or rules align-mode-rules-list align-rules-list)
@@ -1052,7 +1051,9 @@ to be colored."
 
 ;;;###autoload
 (defun align-newline-and-indent ()
-  "A replacement function for `newline-and-indent', aligning as it goes."
+  "A replacement function for `newline-and-indent', aligning as it goes.
+The alignment is done by calling `align' on the region that was
+indented."
   (interactive)
   (let ((separate (or (if (and (symbolp align-region-separate)
                               (boundp align-region-separate))