diff lisp/indent.el @ 110417:8a3552ec7934

* lisp/indent.el (indent-according-to-mode): Apply syntax-propertize. (indent-region): Use indent-according-to-mode. * test/indent/octave.m: Remove one more `fixindent'. Use `end'.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 18 Sep 2010 18:21:16 +0200
parents 280c8ae2476d
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/indent.el	Sat Sep 18 17:50:06 2010 +0200
+++ b/lisp/indent.el	Sat Sep 18 18:21:16 2010 +0200
@@ -68,6 +68,7 @@
 but the functions `indent-relative' and `indent-relative-maybe' are
 special; we don't actually use them here."
   (interactive)
+  (syntax-propertize (line-end-position))
   (if (memq indent-line-function
 	    '(indent-relative indent-relative-maybe))
       ;; These functions are used for tabbing, but can't be used for
@@ -418,7 +419,7 @@
 	    (goto-char start)
 	    (while (< (point) end)
 	      (or (and (bolp) (eolp))
-		  (funcall indent-line-function))
+		  (indent-according-to-mode))
 	      (forward-line 1))
 	    (move-marker end nil))))
     (setq column (prefix-numeric-value column))