From b86170f9b766d7a0aca070572bbc0a080f8eb178 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 16 Jun 2003 16:27:27 +0000 Subject: [PATCH] (pushnew): Use keywordp. --- lisp/emacs-lisp/cl-specs.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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 ;; 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 -- 2.39.2