diff options
| author | Dave Love <fx@gnu.org> | 2000-04-13 19:05:47 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2000-04-13 19:05:47 +0000 |
| commit | 017266f83b027ebf431d01a42402ea7a34d62b79 (patch) | |
| tree | 911ed97a5e6f35868f49d93cb00a292c29c5fdfa /lisp/cus-start.el | |
| parent | 359476e0f0957e9c55cf3f084a67676b896f60a9 (diff) | |
| download | emacs-017266f83b027ebf431d01a42402ea7a34d62b79.tar.gz emacs-017266f83b027ebf431d01a42402ea7a34d62b79.tar.bz2 emacs-017266f83b027ebf431d01a42402ea7a34d62b79.zip | |
Use keywordp.
Diffstat (limited to 'lisp/cus-start.el')
| -rw-r--r-- | lisp/cus-start.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el index c5f73c9cce2..2a7b3b314ba 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -209,8 +209,7 @@ ;; into an expression which produces that value. (quoter (lambda (sexp) (if (or (memq sexp '(t nil)) - (and (symbolp sexp) - (eq (aref (symbol-name sexp) 0) ?:)) + (keywordp sexp) (and (listp sexp) (memq (car sexp) '(lambda))) (stringp sexp) |