Commit 0161a4ae authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Fix compilation warning by having ede-target inherit from eieio-named

* lisp/cedet/ede/base.el (ede-target): Inherit from eieio-named so
that if you're customizing objects via eieio-object-value-get, you
can set the name.

* lisp/emacs-lisp/eieio-custom.el (eieio-object-value-get): Don't
use obsolete function `eieio-object-set-name-string'.
parent 7bf65920
Pipeline #2129 failed with stage
in 90 minutes and 2 seconds
......@@ -46,7 +46,7 @@
;; The TARGET is an entity in a project that knows about files
;; and features of those files.
(defclass ede-target (eieio-speedbar-directory-button)
(defclass ede-target (eieio-speedbar-directory-button eieio-named)
((buttonface :initform speedbar-file-face) ;override for superclass
(name :initarg :name
:type string
......
......@@ -317,7 +317,8 @@ Optional argument IGNORE is an extraneous parameter."
(car (widget-apply (car chil) :value-inline))))
(setq chil (cdr chil))))))
;; Set any name updates on it.
(if name (eieio-object-set-name-string obj name))
(when name
(setf (slot-value obj 'object-name) name))
;; This is the same object we had before.
obj))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment