Mercurial > hg > xemacs-beta
diff lisp/modes/cl-indent.el @ 120:cca96a509cfe r20-1b12
Import from CVS: tag r20-1b12
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:25:29 +0200 |
parents | ac2d302a0011 |
children | 489f57a838ef |
line wrap: on
line diff
--- a/lisp/modes/cl-indent.el Mon Aug 13 09:24:19 2007 +0200 +++ b/lisp/modes/cl-indent.el Mon Aug 13 09:25:29 2007 +0200 @@ -50,16 +50,25 @@ ;;; Code: -(defvar lisp-indent-maximum-backtracking 3 +(defgroup lisp-indent nil + "Indentation in Lisp" + :group 'lisp) + + +(defcustom lisp-indent-maximum-backtracking 3 "*Maximum depth to backtrack out from a sublist for structured indentation. If this variable is 0, no backtracking will occur and forms such as flet -may not be correctly indented.") +may not be correctly indented." + :type 'integer + :group 'lisp-indent) -(defvar lisp-tag-indentation 1 +(defcustom lisp-tag-indentation 1 "*Indentation of tags relative to containing list. -This variable is used by the function `lisp-indent-tagbody'.") +This variable is used by the function `lisp-indent-tagbody'." + :type 'integer + :group 'lisp-indent) -(defvar lisp-tag-body-indentation 3 +(defcustom lisp-tag-body-indentation 3 "*Indentation of non-tagged lines relative to containing list. This variable is used by the function `lisp-indent-tagbody' to indent normal lines (lines without tags). @@ -67,7 +76,9 @@ the special form. If the value is t, the body of tags will be indented as a block at the same indentation as the first s-expression following the tag. In this case, any forms before the first tag are indented -by `lisp-body-indent'.") +by `lisp-body-indent'." + :type 'integer + :group 'lisp-indent) ;;;###autoload