diff options
author | Glenn Morris <rgm@gnu.org> | 2013-09-19 16:11:48 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-09-19 16:11:48 -0400 |
commit | 9a0289a2e92c6737ef3e866b466b237435fe45d3 (patch) | |
tree | b38667744cdf51bf4822abedca8a495a3c156fa6 /lisp/emacs-lisp | |
parent | e189e54eea9d4317c484e534cfbce0bcfb4046ce (diff) | |
download | emacs-9a0289a2e92c6737ef3e866b466b237435fe45d3.tar.gz emacs-9a0289a2e92c6737ef3e866b466b237435fe45d3.tar.bz2 emacs-9a0289a2e92c6737ef3e866b466b237435fe45d3.zip |
* lisp/emacs-lisp/eieio.el (class-parent): Undo previous change.
Ref: http://lists.gnu.org/archive/html/emacs-devel/2013-09/msg00354.html
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/eieio.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el index e7ec547af9b..46381ede9d1 100644 --- a/lisp/emacs-lisp/eieio.el +++ b/lisp/emacs-lisp/eieio.el @@ -322,10 +322,7 @@ The CLOS function `class-direct-subclasses' is aliased to this function." (defmacro eieio-class-parent (class) "Return first parent class to CLASS. (overload of variable)." `(car (eieio-class-parents ,class))) - -(defmacro class-parent (class) - (declare (obsolete eieio-class-parent "24.4")) - '(eieio-class-parent class)) +(define-obsolete-function-alias 'class-parent 'eieio-class-parent "24.4") (defun same-class-p (obj class) "Return t if OBJ is of class-type CLASS." (eieio--check-type class-p class) |