Mercurial > emacs
changeset 60913:42c42c6d71ed
* emacs-lisp/cl-macs.el: Replace `illegal' with `invalid'.
| author | Werner LEMBERG <wl@gnu.org> |
|---|---|
| date | Fri, 25 Mar 2005 08:27:58 +0000 |
| parents | 4a2ea521d778 |
| children | 62dc372efbe1 |
| files | lisp/ChangeLog lisp/emacs-lisp/cl-macs.el |
| diffstat | 2 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- 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>
--- 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)))