diff options
| author | Stefan Monnier | 2012-05-17 21:46:20 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2012-05-17 21:46:20 -0400 |
| commit | b581bb5c8ac2aed4a610097aaaca4a8d354fe9b4 (patch) | |
| tree | 3fac722bbeb0fdf55dc40e414732a3867f29c9e1 /lisp/cedet | |
| parent | 70b8ef8f7855b9983d17731acad2fdfb4fb2a5be (diff) | |
| download | emacs-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.el | 4 |
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. |
| 527 | NAME is the name of the function to create. | 530 | NAME is the name of the function to create. |
| @@ -546,6 +549,7 @@ defined. The default is to call the function `NAME-default' with the | |||
| 546 | appropriate arguments deduced from ARGS. | 549 | appropriate arguments deduced from ARGS. |
| 547 | OVERARGS is a list of arguments passed to the override and | 550 | OVERARGS 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 |