Function: cider--debug-restore-origin

cider--debug-restore-origin is a byte-compiled function defined in cider-debug.el.

Signature

(cider--debug-restore-origin)

Documentation

Move point back to where the current debug session was started.

Return non-nil if point was restored. Does nothing if the origin buffer is no longer live. See cider--debug-remember-origin.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/cider-debug.el
(defun cider--debug-restore-origin ()
  "Move point back to where the current debug session was started.
Return non-nil if point was restored.  Does nothing if the origin buffer
is no longer live.  See `cider--debug-remember-origin'."
  (prog1 (when-let* ((marker cider--debug-origin-marker)
                     (buffer (marker-buffer marker)))
           (when (buffer-live-p buffer)
             (pop-to-buffer buffer)
             (goto-char marker)
             t))
    (setq cider--debug-origin-id nil)
    (when cider--debug-origin-marker
      (set-marker cider--debug-origin-marker nil)
      (setq cider--debug-origin-marker nil))))