From 00242b07fdc767e6485e8b5bb9aac973e1c5174d Mon Sep 17 00:00:00 2001 From: =?utf8?q?Johan=20Bockg=C3=A5rd?= Date: Sat, 27 Jun 2009 22:09:39 +0000 Subject: [PATCH] (defstruct): Fix :conc-name spec. --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/cl-specs.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bb3c17e7bc5..af4e904f0c8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-06-27 Johan Bockgård + + * emacs-lisp/cl-specs.el (defstruct): Fix :conc-name spec. + 2009-06-27 Chong Yidong * faces.el (x-handle-named-frame-geometry): Ensure that we have diff --git a/lisp/emacs-lisp/cl-specs.el b/lisp/emacs-lisp/cl-specs.el index 4c07bdb7813..31a42b1081c 100644 --- a/lisp/emacs-lisp/cl-specs.el +++ b/lisp/emacs-lisp/cl-specs.el @@ -292,7 +292,7 @@ [&or symbolp (gate symbolp &rest - (&or [":conc-name" &or stringp "nil"] + (&or [":conc-name" symbolp] [":constructor" symbolp &optional cl-lambda-list] [":copier" symbolp] [":predicate" symbolp] -- 2.39.2