From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 27 Oct 2006 00:52:06 +0000 (+0000)
Subject: * emacs-lisp/cl-indent.el (lisp-indent-259): Fix last fix.
X-Git-Tag: emacs-pretest-22.0.90~10
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6655e16dbae8383069326d5ac276cad4925649e2;p=emacs.git

* emacs-lisp/cl-indent.el (lisp-indent-259): Fix last fix.
---

diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index 679a9bb68fd..f09b72f396f 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -373,7 +373,9 @@ If nil, indent backquoted lists as data, i.e., like quoted lists."
                      ;; Too few elements in pattern.
                      (throw 'exit normal-indent)))
                 ((eq tem 'nil)
-                 (throw 'exit normal-indent))
+		 (throw 'exit (if (consp normal-indent)
+				  normal-indent
+				(list normal-indent containing-form-start))))
 		((eq tem '&lambda)
 		 (throw 'exit
 			(cond ((null p)