Make named-builder macros indent like functions
This commit is contained in:
parent
7652cdc067
commit
d0765091e1
@ -431,10 +431,12 @@ the original macro (which is passed as the second argument to
|
|||||||
~imalison:named-builder-builder~).
|
~imalison:named-builder-builder~).
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(defmacro imalison:named-builder-builder (named-builder-name builder-name)
|
(defmacro imalison:named-builder-builder (named-builder-name builder-name)
|
||||||
`(defmacro ,named-builder-name (function-name &rest args)
|
`(progn
|
||||||
|
(defmacro ,named-builder-name (function-name &rest args)
|
||||||
(cons 'imalison:named-build
|
(cons 'imalison:named-build
|
||||||
(cons function-name
|
(cons function-name
|
||||||
(cons (quote ,builder-name) args)))))
|
(cons (quote ,builder-name) args))))
|
||||||
|
(put (quote ,named-builder-name) 'lisp-indent-function 1)))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
~imalison:named-builder~ runs ~imalison:named-builder-builder~ with the
|
~imalison:named-builder~ runs ~imalison:named-builder-builder~ with the
|
||||||
convention that original macro to modify is the concatenation of the
|
convention that original macro to modify is the concatenation of the
|
||||||
|
Loading…
Reference in New Issue
Block a user