[Emacs-diffs] master 6697cbf: Fix compilation warning in ede.el

[Lars Ingebrigtsen]

branch: master
commit 6697cbf8f85b197828ec8a63bcd1698e9a08bcac
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Fix compilation warning in ede.el
    
    * lisp/cedet/ede/auto.el (ede-project-autoload): Inherit from
    eieio-named, because we want to set the object name...
    
    * lisp/cedet/ede.el (ede-new): ... which we do here, and fix the
    compilation warning about the obsolete
    eieio-object-set-name-string function.
---
 lisp/cedet/ede.el      | 2 +-
 lisp/cedet/ede/auto.el | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el
index 22374dd..d051510 100644
--- a/lisp/cedet/ede.el
+++ b/lisp/cedet/ede.el
@@ -791,7 +791,7 @@ Optional argument NAME is the name to give this project."
                 ))
         (inits (oref obj initializers)))
     ;; Force the name to match for new objects.
-    (eieio-object-set-name-string nobj (oref nobj name))
+    (setf (slot-value nobj 'object-name) (oref nobj name))
     ;; Handle init args.
     (while inits
       (eieio-oset nobj (car inits) (car (cdr inits)))
diff --git a/lisp/cedet/ede/auto.el b/lisp/cedet/ede/auto.el
index 4871d51..099d60f 100644
--- a/lisp/cedet/ede/auto.el
+++ b/lisp/cedet/ede/auto.el
@@ -31,6 +31,7 @@
 
 (require 'eieio)
 (require 'cl-generic)
+(require 'eieio-base)
 
 (declare-function ede-directory-safe-p "ede")
 (declare-function ede-add-project-to-global-list "ede")
@@ -136,7 +137,7 @@ into memory.")
 (declare-function ede-directory-safe-p "ede")
 (declare-function ede-add-project-to-global-list "ede")
 
-(defclass ede-project-autoload ()
+(defclass ede-project-autoload (eieio-named)
   ((name :initarg :name
         :documentation "Name of this project type")
    (file :initarg :file