summaryrefslogtreecommitdiff
path: root/lisp/wid-edit.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2000-02-16 13:28:33 +0000
committerDave Love <fx@gnu.org>2000-02-16 13:28:33 +0000
commitb2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba (patch)
treef0e0e4af5aa977fb766693d344fce9fb23fbfc53 /lisp/wid-edit.el
parentb49cb76457914bd9fb00569c4966cebf5bfbf41c (diff)
downloademacs-b2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba.tar.gz
2000-02-02 Per Abrahamsen <abraham@dina.kvl.dk>
* wid-edit.el (widget-match-inline): An atom never matches a list.
Diffstat (limited to 'lisp/wid-edit.el')
-rw-r--r--lisp/wid-edit.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 277656415b7..67efcfa88ae 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -474,7 +474,7 @@ Otherwise, just return the value."
"In WIDGET, match the start of VALS."
(cond ((widget-get widget :inline)
(widget-apply widget :match-inline vals))
- ((and vals
+ ((and (listp vals)
(widget-apply widget :match (car vals)))
(cons (list (car vals)) (cdr vals)))
(t nil)))