NOTE: This patch has been committed.
xemacs-packages/prog-modes/ChangeLog addition:
2011-05-15 Didier Verna <didier(a)xemacs.org>
* cl-indent.el (lisp-indent-259): Also call
lisp-indent-lambda-list within a destructured one.
XEmacs Packages source patch:
Diff command: cvs -q diff -u
Files affected: xemacs-packages/prog-modes/cl-indent.el
Index: xemacs-packages/prog-modes/cl-indent.el
===================================================================
RCS file: /cvsroot/xemacs/XEmacs/packages/xemacs-packages/prog-modes/cl-indent.el,v
retrieving revision 1.9
diff -u -u -r1.9 cl-indent.el
--- xemacs-packages/prog-modes/cl-indent.el 12 May 2011 12:19:40 -0000 1.9
+++ xemacs-packages/prog-modes/cl-indent.el 15 May 2011 11:39:50 -0000
@@ -540,15 +540,13 @@
(throw 'exit
(cond ((null p)
(list (+ sexp-column 4) containing-form-start))
- ((null (cdr p))
+ (t
;; Indentation within a lambda-list. -- dvl
(list (lisp-indent-lambda-list
indent-point
sexp-column
containing-form-start)
- containing-form-start))
- (t
- normal-indent))))
+ containing-form-start)))))
((integerp tem)
(throw 'exit
(if (null p) ;not in subforms
--
Resistance is futile. You will be jazzimilated.
Scientific site:
http://www.lrde.epita.fr/~didier
Music (Jazz) site:
http://www.didierverna.com
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches