Как я могу сказать emacs, как аргументы для моей функции elisp должны иметь отступ?

Question

Я написал функцию (на самом деле макрос, но все что угодно), которая работает аналогично progn.Как я могу сказать emacs, что эта функция должна иметь отступ таким же образом, как progn?

Answer 1

Это должно сделать

(put 'myfunc 'lisp-indent-function 0)

Документация для lisp-indent-function (найдена Ch f lisp-indent-function RET ):

lisp-indent-function is a compiled Lisp function in `lisp-mode.el'.

(lisp-indent-function indent-point state)

This function is the normal value of the variable
`lisp-indent-function`. It is used when indenting a line within
a function call, to see if the called function says anything
special about how to indent the line.

indent-point is the position where the user typed TAB, or
equivalent. Point is located at the point to indent under
(for default indentation); state is the `parse-partial-sexp`
state for that position.

If the current line is in a call to a Lisp function which has
a non-nil property `lisp-indent-function`, that specifies how
to do the indentation.  The property value can be:

* `defun`, meaning indent `defun`-style;

* an integer N, meaning indent the first N arguments specially
  like ordinary function arguments and then indent any further
  arguments like a body;

* a function to call just as this function was called. If that
  function returns nil, that means it doesn't specify
  the indentation.

This function also returns nil meaning don't specify the
indentation.

Answer 2

Как это "на самом деле макрос":

C-h i g (elisp) Indenting Macros RET

В данном случае:

(defmacro my-macro (&rest body)
  "Does things"
  (declare (indent defun))
  `(progn ,@body))

(my-macro
  (message "foo")
  (message "bar"))