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).

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 237d93922ff17dc9b477595faf860b3b1af336dd..d81052318cb66cd3bcb02b86b500c56197ef8a18 100644 (file)
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -3276,7 +3276,9 @@ With prefix argument, make it a temporary breakpoint."
   (interactive "P")
   ;; If the form hasn't been instrumented yet, do it now.
   (when (and (not edebug-active)
-            (let ((data (get (edebug-form-data-symbol) 'edebug)))
+            (let ((data (get (edebug--form-data-name
+                               (edebug-get-form-data-entry (point)))
+                              'edebug)))
               (or (null data) (markerp data))))
     (edebug-defun))
   (edebug-modify-breakpoint t nil arg))