* lisp/emacs-lisp/eieio.el (oset, oset-default): Mark as obsolete

This commit is contained in:
Stefan Monnier 2020-05-03 18:05:16 -04:00
parent 7db0093bc2
commit 40149b8718
2 changed files with 6 additions and 2 deletions

View file

@ -101,6 +101,8 @@ horizontal movements now stop at the edge of the board.
* Changes in Specialized Modes and Packages in Emacs 28.1
** EIEIO: 'oset' and 'oset-default' are declared obsolete
** New minor mode 'cl-font-lock-built-in-mode' for `lisp-mode'
The mode provides refined highlighting of built-in functions, types,
and variables.

View file

@ -517,7 +517,8 @@ The CLOS function `class-direct-subclasses' is aliased to this function."
"Set the value in OBJ for slot SLOT to VALUE.
SLOT is the slot name as specified in `defclass' or the tag created
with in the :initarg slot. VALUE can be any Lisp object."
(declare (debug (form symbolp form)))
(declare (obsolete "use (setf (oref ..) ..) instead" "28.1")
(debug (form symbolp form)))
`(eieio-oset ,obj (quote ,slot) ,value))
(defmacro oset-default (class slot value)
@ -525,7 +526,8 @@ with in the :initarg slot. VALUE can be any Lisp object."
The default value is usually set with the :initform tag during class
creation. This allows users to change the default behavior of classes
after they are created."
(declare (debug (form symbolp form)))
(declare (obsolete "use (setf (oref-default ..) ..) instead" "28.1")
(debug (form symbolp form)))
`(eieio-oset-default ,class (quote ,slot) ,value))
;;; CLOS queries into classes and slots