Function: profiler-report-find-entry
profiler-report-find-entry is an interactive and byte-compiled
function defined in profiler.el.gz.
Signature
(profiler-report-find-entry &optional EVENT)
Documentation
Find entry at point.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/profiler.el.gz
(defun profiler-report-find-entry (&optional event)
"Find entry at point."
(interactive (list last-nonmenu-event))
(with-current-buffer
(if event (window-buffer (posn-window (event-start event)))
(current-buffer))
(and event (setq event (event-end event))
(posn-set-point event))
(save-excursion
(forward-line 0)
(let ((eol (pos-eol)))
(forward-button 1)
(if (> (point) eol)
(error "No entry found")
(push-button))))))