3 ;; FIXME: obviously this is incomplete
4 (defmacro defcustom
(symbol value doc
&rest args
)
5 (declare (ignore args
))
6 `(defvar ,symbol
,value
,doc
))
9 (defmacro defgroup
(name something docstring
&rest stuff
)
10 (declare (ignore name something docstring stuff
))
14 (defmacro defface
(name colors docstring
&key group
)
15 (declare (ignore name colors docstring group
))
18 ;; FIXME: this is incomplete
19 (defmacro defcustom-buffer-local
(symbol value doc
&rest args
)
20 (declare (ignore args
))
21 `(define-buffer-local ,symbol
,value
,doc
))