Mercurial > emacs

changeset 43920:af0b9648d018

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(common-lisp-loop-part-indentation): Fix simple loop indentation.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 15 Mar 2002 08:57:38 +0000
parents 833c0585a612
children 4736132433fb
files lisp/emacs-lisp/cl-indent.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-indent.el	Thu Mar 14 21:36:28 2002 +0000
+++ b/lisp/emacs-lisp/cl-indent.el	Fri Mar 15 08:57:38 2002 +0000
@@ -127,7 +127,7 @@
     (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