aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGerd Moellmann <[email protected]>2002-03-15 08:57:55 +0000
committerGerd Moellmann <[email protected]>2002-03-15 08:57:55 +0000
commit93097873576ec630784db76386e4edc2a7307d9a (patch)
treedc8c0bdb672638c2ffa71196a959def279391d28 /lisp
parentad4ace7a6590289e53f1e1106c2d0603ea732d4c (diff)
(common-lisp-loop-part-indentation):
Fix simple loop indentation.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/emacs-lisp/cl-indent.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fe6b959481..fef8cc68bc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-15 Gerd Moellmann <[email protected]>
+
+ * emacs-lisp/cl-indent.el (common-lisp-loop-part-indentation):
+ Fix simple loop indentation.
+
2002-03-14 Miles Bader <[email protected]>
* net/rlogin.el (rlogin-mode): Use `define-derived-mode'.
diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index 6b40051193..18149901a0 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -127,7 +127,7 @@ If nil, indent backquoted lists as data, i.e., like quoted lists."
(goto-char indent-point)
(beginning-of-line)
(cond ((not (extended-loop-p (elt state 1)))
- lisp-simple-loop-indentation)
+ (+ loop-indentation lisp-simple-loop-indentation))
((looking-at "^\\s-*\\(:?\\sw+\\|;\\)")
(+ loop-indentation lisp-loop-keyword-indentation))
(t