* lisp/emacs-lisp/eieio.el (oset, oset-default): Mark as obsolete
This commit is contained in:
parent
7db0093bc2
commit
40149b8718
2 changed files with 6 additions and 2 deletions
2
etc/NEWS
2
etc/NEWS
|
@ -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.
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue