diff options
| author | Dave Love | 2000-02-16 13:28:33 +0000 |
|---|---|---|
| committer | Dave Love | 2000-02-16 13:28:33 +0000 |
| commit | b2aeee30bf5ac1cf8e76d5b9b5a7e4fc85c7b9ba (patch) | |
| tree | f0e0e4af5aa977fb766693d344fce9fb23fbfc53 | |
| parent | b49cb76457914bd9fb00569c4966cebf5bfbf41c (diff) | |
| download | emacs-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/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/wid-edit.el | 2 |
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 @@ | |||
| 1 | 2000-02-16 Per Abrahamsen <abraham@dina.kvl.dk> | ||
| 2 | |||
| 3 | * wid-edit.el (widget-match-inline): An atom never matches a | ||
| 4 | list. | ||
| 5 | |||
| 1 | 2000-02-15 Dirk Herrmann <D.Herrmann@tu-bs.de> | 6 | 2000-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))) |