Mercurial > emacs
changeset 28566:147fceec5b4f
(keywordp): Remove.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Thu, 13 Apr 2000 19:04:00 +0000 |
| parents | 69dea80bbb87 |
| children | 3ed20cb4c9b3 |
| files | lisp/emacs-lisp/cl-compat.el |
| diffstat | 1 files changed, 0 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-compat.el Thu Apr 13 19:03:34 2000 +0000 +++ b/lisp/emacs-lisp/cl-compat.el Thu Apr 13 19:04:00 2000 +0000 @@ -54,9 +54,6 @@ (defmacro defkeyword (x &optional doc) (list* 'defconst x (list 'quote x) (and doc (list doc)))) -(defun keywordp (sym) - (and (symbolp sym) (eq (aref (symbol-name sym) 0) ?\:) (set sym sym))) - (defun keyword-of (sym) (or (keywordp sym) (keywordp (intern (format ":%s" sym)))))