Mercurial > emacs
changeset 54509:e20bae3e3270
(ad-subr-arglist): Undo part of last patch.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 23 Mar 2004 02:45:33 +0000 |
| parents | 192ac22b4182 |
| children | 99f05a0b48dd |
| files | lisp/emacs-lisp/advice.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/advice.el Tue Mar 23 02:35:36 2004 +0000 +++ b/lisp/emacs-lisp/advice.el Tue Mar 23 02:45:33 2004 +0000 @@ -2579,7 +2579,10 @@ ;; the old way of doing things. (let ((doc (or (ad-real-documentation subr-name t) ""))) (if (not (string-match "\n\n\\((.+)\\)\\'" doc)) - (error "The usage info is missing from the subr %s" subr-name) + ;; Signalling an error leads to bugs during bootstrapping because + ;; the DOC file is not yet built (which is an error, BTW). + ;; (error "The usage info is missing from the subr %s" subr-name) + '(&rest ad-subr-args) (ad-define-subr-args subr-name (cdr (car (read-from-string