From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 16 Jun 2003 16:27:27 +0000 (+0000)
Subject: (pushnew): Use keywordp.
X-Git-Tag: ttn-vms-21-2-B4~9640
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b86170f9b766d7a0aca070572bbc0a080f8eb178;p=emacs.git

(pushnew): Use keywordp.
---

diff --git a/lisp/emacs-lisp/cl-specs.el b/lisp/emacs-lisp/cl-specs.el
index 21353755ed6..077f006ec3b 100644
--- a/lisp/emacs-lisp/cl-specs.el
+++ b/lisp/emacs-lisp/cl-specs.el
@@ -1,13 +1,13 @@
 ;;; cl-specs.el --- Edebug specs for cl.el -*- no-byte-compile: t -*-
 
-;; Copyright (C) 1993 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 2003  Free Software Foundation, Inc.
 ;; Author: Daniel LaLiberte <liberte@holonexus.org>
 ;; Keywords: lisp, tools, maint
 
 ;; LCD Archive Entry:
 ;; cl-specs.el|Daniel LaLiberte|liberte@holonexus.org
 ;; |Edebug specs for cl.el
-;; |$Date: 2002/10/01 17:00:27 $|1.1|
+;; |$Date: 2003/02/04 12:53:34 $|1.1|
 
 ;; This file is part of GNU Emacs.
 
@@ -131,7 +131,7 @@
 (def-edebug-spec pushnew
   (form place &rest
 	&or [[&or ":test" ":test-not" ":key"] function-form]
-	[edebug-keywordp form]))
+	[keywordp form]))
 (def-edebug-spec pop (place))		; different for CL
 
 (def-edebug-spec shiftf (&rest place))  ;; really [&rest place] form