# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 950707552 0
# Node ID bc335df2900050fa75b11c76bdf8392e6ccbb316
# Parent  8127d56649988ad7454ee1baa74b2e481f216cf0
2000-02-02  Per Abrahamsen  <abraham@dina.kvl.dk>

	* wid-edit.el (widget-match-inline): An atom never matches a
          list.

diff -r 8127d5664998 -r bc335df29000 lisp/wid-edit.el
--- a/lisp/wid-edit.el	Wed Feb 16 00:36:27 2000 +0000
+++ b/lisp/wid-edit.el	Wed Feb 16 13:25:52 2000 +0000
@@ -474,7 +474,7 @@
   "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)))