# HG changeset patch
# User Werner LEMBERG <wl@gnu.org>
# Date 1111739278 0
# Node ID 42c42c6d71ed97cb642a5bebde89a8352e757439
# Parent  4a2ea521d778c7e97a477fac69a98a175a44e150
* emacs-lisp/cl-macs.el: Replace `illegal' with `invalid'.

diff -r 4a2ea521d778 -r 42c42c6d71ed lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Mar 25 08:25:16 2005 +0000
+++ b/lisp/ChangeLog	Fri Mar 25 08:27:58 2005 +0000
@@ -3,6 +3,7 @@
 	* calc/calc-forms.el, calc/calc-sel: Replace `illegal' with
 	`invalid'.
 	* midnight.el, vc-cvs.el: Replace `illegal' with `invalid'.
+	* emacs-lisp/cl-macs.el: Replace `illegal' with `invalid'.
 
 2005-03-24  Stefan Monnier  <monnier@iro.umontreal.ca>
 
diff -r 4a2ea521d778 -r 42c42c6d71ed lisp/emacs-lisp/cl-macs.el
--- a/lisp/emacs-lisp/cl-macs.el	Fri Mar 25 08:25:16 2005 +0000
+++ b/lisp/emacs-lisp/cl-macs.el	Fri Mar 25 08:27:58 2005 +0000
@@ -1,6 +1,6 @@
 ;;; cl-macs.el --- Common Lisp macros -*-byte-compile-dynamic: t;-*-
 
-;; Copyright (C) 1993, 2003, 2004 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 2003, 2004, 2005 Free Software Foundation, Inc.
 
 ;; Author: Dave Gillespie <daveg@synaptics.com>
 ;; Version: 2.02
@@ -2219,7 +2219,7 @@
       (if type
 	  (progn
 	    (or (memq type '(vector list))
-		(error "Illegal :type specifier: %s" type))
+		(error "Invalid :type specifier: %s" type))
 	    (if named (setq tag name)))
 	(setq type 'vector named 'true)))
     (or named (setq descs (delq (assq 'cl-tag-slot descs) descs)))