Mercurial > emacs
changeset 71852:81b8b2bb63de
(edebug-instrument-function): Err if find-function-noselect gives no position.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 12 Jul 2006 16:04:23 +0000 |
| parents | fcc45339ef47 |
| children | ede3900365e4 |
| files | lisp/emacs-lisp/edebug.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/edebug.el Wed Jul 12 16:03:47 2006 +0000 +++ b/lisp/emacs-lisp/edebug.el Wed Jul 12 16:04:23 2006 +0000 @@ -3419,6 +3419,8 @@ func) (t (let ((loc (find-function-noselect func))) + (unless (cdr loc) + (error "Could not find the definition in its file")) (with-current-buffer (car loc) (goto-char (cdr loc)) (edebug-eval-top-level-form)