From 88d9af06cb96d67661ce930b97476b14b16a1308 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 13 Apr 2000 19:04:00 +0000 Subject: (keywordp): Remove. --- lisp/emacs-lisp/cl-compat.el | 3 --- 1 file changed, 3 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/cl-compat.el b/lisp/emacs-lisp/cl-compat.el index 7d5b6492ed..01cf288ea7 100644 --- a/lisp/emacs-lisp/cl-compat.el +++ b/lisp/emacs-lisp/cl-compat.el @@ -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))))) -- cgit v1.2.3