diff options
| author | Stefan Monnier | 2000-06-26 21:56:10 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2000-06-26 21:56:10 +0000 |
| commit | ff83e9686848673c3b8d564746095164369d5af4 (patch) | |
| tree | 1b5a46e961cc60043c1d554f0c6a1274828b7aef | |
| parent | a52548173c3bba05107a5114db156cfcdc9820ad (diff) | |
| download | emacs-ff83e9686848673c3b8d564746095164369d5af4.tar.gz emacs-ff83e9686848673c3b8d564746095164369d5af4.zip | |
(widget-member): Use the new plist-member.
| -rw-r--r-- | lisp/wid-edit.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index ac2cc0d9ef6..dd5c3e2dd75 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el | |||
| @@ -424,7 +424,7 @@ Otherwise, just return the value." | |||
| 424 | 424 | ||
| 425 | (defun widget-member (widget property) | 425 | (defun widget-member (widget property) |
| 426 | "Non-nil iff there is a definition in WIDGET for PROPERTY." | 426 | "Non-nil iff there is a definition in WIDGET for PROPERTY." |
| 427 | (cond ((widget-plist-member (cdr widget) property) | 427 | (cond ((plist-member (cdr widget) property) |
| 428 | t) | 428 | t) |
| 429 | ((car widget) | 429 | ((car widget) |
| 430 | (widget-member (get (car widget) 'widget-type) property)) | 430 | (widget-member (get (car widget) 'widget-type) property)) |