Correctly return passed value from widget-put
* lisp/wid-edit.el (widget-get-indirect): Return passed value to stay consistent with old C implementation. (Bug#76664)
This commit is contained in:
parent
10f11d730e
commit
5b13541858
1 changed files with 2 additions and 1 deletions
|
@ -625,7 +625,8 @@ and saves that overlay under the :inactive property for WIDGET."
|
|||
(defun widget-put (widget property value)
|
||||
"In WIDGET, set PROPERTY to VALUE.
|
||||
The value can later be retrieved with `widget-get'."
|
||||
(setcdr widget (plist-put (cdr widget) property value)))
|
||||
(setcdr widget (plist-put (cdr widget) property value))
|
||||
value)
|
||||
|
||||
;;;###autoload
|
||||
(defun widget-get (widget property)
|
||||
|
|
Loading…
Add table
Reference in a new issue