aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-02-16 13:28:33 +0000
committerDave Love2000-02-16 13:28:33 +0000
commitb2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba (patch)
treef0e0e4af5aa977fb766693d344fce9fb23fbfc53
parentb49cb76457914bd9fb00569c4966cebf5bfbf41c (diff)
downloademacs-b2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba.tar.gz
emacs-b2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba.zip
2000-02-02 Per Abrahamsen <abraham@dina.kvl.dk>
* wid-edit.el (widget-match-inline): An atom never matches a list.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/wid-edit.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b26a59b8ed9..4572cf4eb6d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12000-02-16 Per Abrahamsen <abraham@dina.kvl.dk>
2
3 * wid-edit.el (widget-match-inline): An atom never matches a
4 list.
5
12000-02-15 Dirk Herrmann <D.Herrmann@tu-bs.de> 62000-02-15 Dirk Herrmann <D.Herrmann@tu-bs.de>
2 7
3 * textmodes/bibtex.el (bibtex-mode): Replaced manual splitting of path 8 * textmodes/bibtex.el (bibtex-mode): Replaced manual splitting of path
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."
474 "In WIDGET, match the start of VALS." 474 "In WIDGET, match the start of VALS."
475 (cond ((widget-get widget :inline) 475 (cond ((widget-get widget :inline)
476 (widget-apply widget :match-inline vals)) 476 (widget-apply widget :match-inline vals))
477 ((and vals 477 ((and (listp vals)
478 (widget-apply widget :match (car vals))) 478 (widget-apply widget :match (car vals)))
479 (cons (list (car vals)) (cdr vals))) 479 (cons (list (car vals)) (cdr vals)))
480 (t nil))) 480 (t nil)))