* lisp/subr.el (with-wrapper-hook): Fix edebug spec.

This commit is contained in:
Stefan Monnier 2011-09-23 10:32:36 -04:00
parent 022de23e6c
commit 01c157cc39
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2011-09-23 Stefan Monnier <monnier@iro.umontreal.ca>
* subr.el (with-wrapper-hook): Fix edebug spec.
2011-09-23 Lars Magne Ingebrigtsen <larsi@gnus.org>
* simple.el (kill-line): Note effect of `show-trailing-whitespace'

View file

@ -1377,7 +1377,7 @@ arbitrary expression.
ARGS is a list of variables which will be passed as additional arguments
to each function, after the initial argument, and which the first argument
expects to receive when called."
(declare (indent 2) (debug t))
(declare (indent 2) (debug (form sexp body)))
;; We need those two gensyms because CL's lexical scoping is not available
;; for function arguments :-(
(let ((funs (make-symbol "funs"))