diff options
| author | Lute Kamstra | 2005-03-04 14:48:14 +0000 |
|---|---|---|
| committer | Lute Kamstra | 2005-03-04 14:48:14 +0000 |
| commit | 15cf150db787216573e8be45195fa87c40dae3ec (patch) | |
| tree | 1d3157341e92d0160b45fe2df470714dc6c424cf | |
| parent | b12e59fd62409f8776cd660813c7053a78250b39 (diff) | |
| download | emacs-15cf150db787216573e8be45195fa87c40dae3ec.tar.gz emacs-15cf150db787216573e8be45195fa87c40dae3ec.zip | |
(debugger-step-after-exit): Make it a defvar.
(debug-function-list): Ditto.
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 0692b7995ea..ab197e8e119 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el | |||
| @@ -51,15 +51,11 @@ the middle is discarded, and just the beginning and end are displayed." | |||
| 51 | :group 'debugger | 51 | :group 'debugger |
| 52 | :version "21.1") | 52 | :version "21.1") |
| 53 | 53 | ||
| 54 | (defcustom debug-function-list nil | 54 | (defvar debug-function-list nil |
| 55 | "List of functions currently set for debug on entry." | 55 | "List of functions currently set for debug on entry.") |
| 56 | :type '(repeat function) | 56 | |
| 57 | :group 'debugger) | 57 | (defvar debugger-step-after-exit nil |
| 58 | 58 | "Non-nil means \"single-step\" after the debugger exits.") | |
| 59 | (defcustom debugger-step-after-exit nil | ||
| 60 | "Non-nil means \"single-step\" after the debugger exits." | ||
| 61 | :type 'boolean | ||
| 62 | :group 'debugger) | ||
| 63 | 59 | ||
| 64 | (defvar debugger-value nil | 60 | (defvar debugger-value nil |
| 65 | "This is the value for the debugger to return, when it returns.") | 61 | "This is the value for the debugger to return, when it returns.") |