Mercurial > emacs

diff lisp/cus-start.el @ 28569:e2b3c1885fb1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use keywordp.
author Dave Love <fx@gnu.org>
date Thu, 13 Apr 2000 19:05:47 +0000
parents 580d9429435a
children 83e9db7aeddb
line wrap: on
line diff
--- a/lisp/cus-start.el	Thu Apr 13 19:05:10 2000 +0000
+++ b/lisp/cus-start.el	Thu Apr 13 19:05:47 2000 +0000
@@ -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)