(pascal-sub-block-re): Recognize for and with.

diff --git a/lisp/progmodes/pascal.el b/lisp/progmodes/pascal.el
index 469c9c1a9ce7e4ea95d3a8af1f8c47cc1dd239d4..510c78f3b2496db663669e2b35c9199a0c2ee452 100644 (file)
--- a/lisp/progmodes/pascal.el
+++ b/lisp/progmodes/pascal.el
@@ -112,7 +112,7 @@
 (defconst pascal-end-block-re   "\\<\\(end\\|until\\)\\>")
 (defconst pascal-declaration-re "\\<\\(const\\|label\\|type\\|var\\)\\>")
 (defconst pascal-defun-re       "\\<\\(function\\|procedure\\|program\\)\\>")
-(defconst pascal-sub-block-re   "\\<\\(if\\|else\\|while\\)\\>")
+(defconst pascal-sub-block-re   "\\<\\(if\\|else\\|for\\|while\\|with\\)\\>")
 (defconst pascal-noindent-re    "\\<\\(begin\\|end\\|until\\)\\>")
 (defconst pascal-nosemi-re      "\\<\\(begin\\|repeat\\|then\\|do\\|else\\)\\>")
 (defconst pascal-autoindent-lines-re