summaryrefslogtreecommitdiff
path: root/lisp/wid-edit.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2019-10-16 15:42:41 +0200
committerJuanma Barranquero <lekktu@gmail.com>2019-10-16 15:42:41 +0200
commitd502f0c4b5bf0d6dbf0a125b01db21fa3b6292df (patch)
tree517b91ddfa0613122bfc4429d87f83495defeedf /lisp/wid-edit.el
parent4d65821bf016dff6a8b10578913970f854763346 (diff)
downloademacs-d502f0c4b5bf0d6dbf0a125b01db21fa3b6292df.tar.gz
* lisp/wid-edit.el (widget-default-active): Normalize boolean result.
Diffstat (limited to 'lisp/wid-edit.el')
-rw-r--r--lisp/wid-edit.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 4d1a609809d..32e0b3e125b 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -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."