diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-09-24 17:47:35 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-09-26 13:23:57 +0200 |
| commit | 8c3ec4e3ccf8b675195d173c207ff3accfca5301 (patch) | |
| tree | c9696e494c8ef45b1a267c5659b1823013239020 /lisp/emacs-lisp/eieio.el | |
| parent | f3a6fe2c7d5943dcf241700aaf5c10c485217f60 (diff) | |
| download | emacs-8c3ec4e3ccf8b675195d173c207ff3accfca5301.tar.gz emacs-8c3ec4e3ccf8b675195d173c207ff3accfca5301.tar.bz2 emacs-8c3ec4e3ccf8b675195d173c207ff3accfca5301.zip | |
Fill some auto-generated docstring lines
* lisp/cedet/mode-local.el (define-mode-local-override):
* lisp/cedet/semantic/decorate/mode.el (define-semantic-decoration-style):
* lisp/cedet/semantic/idle.el (define-semantic-idle-service):
* lisp/emacs-lisp/derived.el (derived-mode-make-docstring):
* lisp/emacs-lisp/eieio.el (defclass): Fill auto-generated docstring
lines.
Diffstat (limited to 'lisp/emacs-lisp/eieio.el')
| -rw-r--r-- | lisp/emacs-lisp/eieio.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el index c16d8e110ec..2dc3e0aeffa 100644 --- a/lisp/emacs-lisp/eieio.el +++ b/lisp/emacs-lisp/eieio.el @@ -205,7 +205,7 @@ and reference them using the function `class-option'." (eieio-oset this ',sname value)) accessors) (push `(cl-defmethod ,acces ((this ,name)) - ,(format + ,(internal--format-docstring-line "Retrieve the slot `%S' from an object of class `%S'." sname name) ;; FIXME: Why is this different from the :reader case? @@ -285,7 +285,8 @@ This method is obsolete." ;; Non-abstract classes need a constructor. `(defun ,name (&rest slots) - ,(format "Create a new object of class type `%S'." name) + ,(internal--format-docstring-line + "Create a new object of class type `%S'." name) (declare (compiler-macro (lambda (whole) (if (not (stringp (car slots))) |