mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-03 11:33:37 +00:00
* lisp/wid-edit.el (widget-default-active): Normalize boolean result.
This commit is contained in:
parent
4d65821bf0
commit
d502f0c4b5
@ -1663,7 +1663,8 @@ The value of the :type attribute should be an unconverted widget type."
|
||||
(and (not (widget-get widget :inactive))
|
||||
(let ((parent (widget-get widget :parent)))
|
||||
(or (null parent)
|
||||
(widget-apply parent :active))))))
|
||||
(widget-apply parent :active)))
|
||||
t)))
|
||||
|
||||
(defun widget-default-deactivate (widget)
|
||||
"Make WIDGET inactive for user modifications."
|
||||
|
Loading…
Reference in New Issue
Block a user