aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet
diff options
context:
space:
mode:
authorStefan Monnier2012-05-17 21:46:20 -0400
committerStefan Monnier2012-05-17 21:46:20 -0400
commitb581bb5c8ac2aed4a610097aaaca4a8d354fe9b4 (patch)
tree3fac722bbeb0fdf55dc40e414732a3867f29c9e1 /lisp/cedet
parent70b8ef8f7855b9983d17731acad2fdfb4fb2a5be (diff)
downloademacs-b581bb5c8ac2aed4a610097aaaca4a8d354fe9b4.tar.gz
emacs-b581bb5c8ac2aed4a610097aaaca4a8d354fe9b4.zip
* lisp/emacs-lisp/lisp-mode.el (doc-string-elt): Move those properties to
their respective macro declarations. * lisp/skeleton.el (define-skeleton): * lisp/progmodes/compile.el (define-compilation-mode): * lisp/ibuf-macs.el (define-ibuffer-sorter, define-ibuffer-op) (define-ibuffer-filter): * lisp/emacs-lisp/generic.el (define-generic-mode): * lisp/emacs-lisp/easy-mmode.el (define-minor-mode) (define-globalized-minor-mode): * lisp/emacs-lisp/cl-macs.el (defun*, defmacro*, defstruct, deftype): * lisp/emacs-lisp/byte-run.el (defsubst): * lisp/custom.el (deftheme): Add doc-string metadata.
Diffstat (limited to 'lisp/cedet')
-rw-r--r--lisp/cedet/mode-local.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/cedet/mode-local.el b/lisp/cedet/mode-local.el
index 7346e88797d..11968f3fa35 100644
--- a/lisp/cedet/mode-local.el
+++ b/lisp/cedet/mode-local.el
@@ -522,6 +522,9 @@ See also the function `define-overload'."
522 (list (mode-local--override name args body)) 522 (list (mode-local--override name args body))
523 result))) 523 result)))
524 524
525;;;###autoload
526(put 'define-overloadable-function 'doc-string-elt 3)
527
525(defmacro define-overloadable-function (name args docstring &rest body) 528(defmacro define-overloadable-function (name args docstring &rest body)
526 "Define a new function, as with `defun', which can be overloaded. 529 "Define a new function, as with `defun', which can be overloaded.
527NAME is the name of the function to create. 530NAME is the name of the function to create.
@@ -546,6 +549,7 @@ defined. The default is to call the function `NAME-default' with the
546appropriate arguments deduced from ARGS. 549appropriate arguments deduced from ARGS.
547OVERARGS is a list of arguments passed to the override and 550OVERARGS is a list of arguments passed to the override and
548`NAME-default' function, in place of those deduced from ARGS." 551`NAME-default' function, in place of those deduced from ARGS."
552 (declare (doc-string 3))
549 `(eval-and-compile 553 `(eval-and-compile
550 (defun ,name ,args 554 (defun ,name ,args
551 ,docstring 555 ,docstring