diff options
Diffstat (limited to 'lisp/cedet/ede.el')
| -rw-r--r-- | lisp/cedet/ede.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el index 22374dd6a63..d051510a994 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))) |