diff options
| -rw-r--r-- | lisp/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/emacs-lisp/cl.el | 3 |
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 542c951ad01..ca86a0a27b6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2006-01-30 John Paul Wallington <jpw@pobox.com> + + * subr.el (toplevel): Define `cl-assertion-failed' condition here + because the `assert' macro signals it at runtime. + + * emacs-lisp/cl.el (toplevel): Remove definition of + `cl-assertion-failed' condition. + 2006-01-30 Nick Roberts <nickrob@snap.net.nz> * thumbs.el (thumbs-marked-list): Make buffer-local and diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el index 8875366cc9c..b7cf3ad8bcc 100644 --- a/lisp/emacs-lisp/cl.el +++ b/lisp/emacs-lisp/cl.el @@ -580,9 +580,6 @@ If ALIST is non-nil, the new pairs are prepended to it." ;;; Miscellaneous. -(put 'cl-assertion-failed 'error-conditions '(error)) -(put 'cl-assertion-failed 'error-message "Assertion failed") - (defvar cl-fake-autoloads nil "Non-nil means don't make CL functions autoload.") |