diff options
| author | Stefan Monnier | 2017-02-28 09:41:04 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2017-02-28 09:41:04 -0500 |
| commit | 8d7a3f489082e2aaf4ff238613a497cc03d833ae (patch) | |
| tree | df4c49613fd49c068039b5b2b26635c3f85debe7 | |
| parent | a3069604d5d672975ee9e421881fad9be95aaf54 (diff) | |
| download | emacs-8d7a3f489082e2aaf4ff238613a497cc03d833ae.tar.gz emacs-8d7a3f489082e2aaf4ff238613a497cc03d833ae.zip | |
* lisp/cedet/mode-local.el (define-mode-local-override): Declare doctring.
| -rw-r--r-- | lisp/cedet/mode-local.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/cedet/mode-local.el b/lisp/cedet/mode-local.el index ef24e8a6cb9..88ee4001414 100644 --- a/lisp/cedet/mode-local.el +++ b/lisp/cedet/mode-local.el | |||
| @@ -579,6 +579,8 @@ ARGS are the function arguments, which should match those of the same | |||
| 579 | named function created with `define-overload'. | 579 | named function created with `define-overload'. |
| 580 | DOCSTRING is the documentation string. | 580 | DOCSTRING is the documentation string. |
| 581 | BODY is the implementation of this function." | 581 | BODY is the implementation of this function." |
| 582 | ;; FIXME: Make this obsolete and use cl-defmethod with &context instead. | ||
| 583 | (declare (doc-string 4)) | ||
| 582 | (let ((newname (intern (format "%s-%s" name mode)))) | 584 | (let ((newname (intern (format "%s-%s" name mode)))) |
| 583 | `(progn | 585 | `(progn |
| 584 | (eval-and-compile | 586 | (eval-and-compile |