diff options
| author | Lars Ingebrigtsen | 2019-11-01 17:42:22 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-11-01 17:42:28 +0100 |
| commit | 0714d6664cd2e836d425d00951bbe599af553952 (patch) | |
| tree | 5c9a0afa8c02b1ad761d0e0a8ebee465eae0e13f | |
| parent | 64a1541175ffac58eeba0b4811b1d20d3434c5bf (diff) | |
| download | emacs-0714d6664cd2e836d425d00951bbe599af553952.tar.gz emacs-0714d6664cd2e836d425d00951bbe599af553952.zip | |
Really enable setting a breakpoint without instrumenting first
* lisp/emacs-lisp/edebug.el (edebug-set-breakpoint): Really enable
setting a breakpoint without instrumenting first (bug#23469).
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 237d93922ff..d81052318cb 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el | |||
| @@ -3276,7 +3276,9 @@ With prefix argument, make it a temporary breakpoint." | |||
| 3276 | (interactive "P") | 3276 | (interactive "P") |
| 3277 | ;; If the form hasn't been instrumented yet, do it now. | 3277 | ;; If the form hasn't been instrumented yet, do it now. |
| 3278 | (when (and (not edebug-active) | 3278 | (when (and (not edebug-active) |
| 3279 | (let ((data (get (edebug-form-data-symbol) 'edebug))) | 3279 | (let ((data (get (edebug--form-data-name |
| 3280 | (edebug-get-form-data-entry (point))) | ||
| 3281 | 'edebug))) | ||
| 3280 | (or (null data) (markerp data)))) | 3282 | (or (null data) (markerp data)))) |
| 3281 | (edebug-defun)) | 3283 | (edebug-defun)) |
| 3282 | (edebug-modify-breakpoint t nil arg)) | 3284 | (edebug-modify-breakpoint t nil arg)) |