* lisp/emacs-lisp/cl-macs.el (cl-defstruct): Fix docstring of accessors.

diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 23c4351c7ca3556967d97c4259b2ab419f623c17..c4a1dcb8baae94e3b1c22374943e8e5a2f4d9871 100644 (file)
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -2903,7 +2903,7 @@ non-nil value, that slot cannot be set via `setf'.
              ;; and pred-check, so changing it is not straightforward.
              (push `(,defsym ,accessor (cl-x)
                        ,(format "Access slot \"%s\" of `%s' struct CL-X."
-                                slot struct)
+                                slot name)
                        (declare (side-effect-free t))
                        ,@(and pred-check
                              (list `(or ,pred-check