Prefix slot names with %
This commit is contained in:
parent
56ffef857f
commit
bd5c2c6681
|
@ -23,9 +23,9 @@ lisp-mode emacs-lisp-mode inferior-emacs-lisp-mode
|
|||
|
||||
slime-repl-mode lisp-mode
|
||||
(dc "(defclass " (p "symbol") " (" (s "superclasses") ")" n>
|
||||
"(" "(" (p "slot" slot)
|
||||
" :initarg :" (s slot) n>
|
||||
" :accessor " (s slot) > ")" "))")
|
||||
"(" "(%" (p "slot" slot)
|
||||
" :initarg :" (s slot) n>
|
||||
" :accessor " (s slot) > ")" "))")
|
||||
(dg "(defgeneric " p " (" ")" n>
|
||||
"(:documentation \"" (s "docstring") "\"))")
|
||||
(qq "(ql:quickload '(" (p "packages") "))")
|
||||
|
|
Loading…
Reference in New Issue