884 |
like ordinary function arguments and then indent any further |
like ordinary function arguments and then indent any further |
885 |
arguments like a body; |
arguments like a body; |
886 |
* a function to call just as this function was called. |
* a function to call just as this function was called. |
887 |
If that function returns nil, that means it doesn't specify |
If that function returns nil, that means it doesn't specify |
888 |
the indentation. |
the indentation. |
889 |
|
|
890 |
This function also returns nil meaning don't specify the indentation." |
This function also returns nil meaning don't specify the indentation." |
891 |
(let ((normal-indent (current-column))) |
(let ((normal-indent (current-column))) |
921 |
(lisp-indent-specform method state |
(lisp-indent-specform method state |
922 |
indent-point normal-indent)) |
indent-point normal-indent)) |
923 |
(method |
(method |
924 |
(funcall method state indent-point))))))) |
(funcall method indent-point state))))))) |
925 |
|
|
926 |
(defvar lisp-body-indent 2 |
(defvar lisp-body-indent 2 |
927 |
"Number of columns to indent the second line of a `(def...)' form.") |
"Number of columns to indent the second line of a `(def...)' form.") |