diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/wid-edit.el | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dbe89b58c67..eb5477ae077 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-02-15 Per Abrahamsen <abraham@dina.kvl.dk> + + * wid-edit.el (widgetp): Made it more robuts. + 2002-02-14 Per Abrahamsen <abraham@dina.kvl.dk> * facemenu.el (describe-text-done): New function. diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 626f4c7c713..ba4ce1131a3 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -474,7 +474,8 @@ new value.") (if (symbolp widget) (get widget 'widget-type) (and (consp widget) - (get (widget-type widget) 'widget-type)))) + (symbolp (car widget)) + (get (car widget) 'widget-type)))) (defun widget-get-indirect (widget property) "In WIDGET, get the value of PROPERTY. |