aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2019-07-30 12:04:21 +0200
committerLars Ingebrigtsen2019-07-30 12:04:21 +0200
commit26381d56e2e39700c60e17ca22c418028a3bfbd9 (patch)
tree20e9a59155cfd38906bfb3f2f3e1f1cda604daed
parente18a4a08e40c83623c7c5c7159de1b772d22303a (diff)
downloademacs-26381d56e2e39700c60e17ca22c418028a3bfbd9.tar.gz
emacs-26381d56e2e39700c60e17ca22c418028a3bfbd9.zip
Use the elisp xref backend in profiler buffers
* lisp/profiler.el (profiler--xref-backend): New function (bug#23455). (profiler-report-mode): Use it to use the elisp xref handler when hitting `M-.' in profiler buffers.
-rw-r--r--lisp/profiler.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/profiler.el b/lisp/profiler.el
index ee11ff68c56..92495e2de88 100644
--- a/lisp/profiler.el
+++ b/lisp/profiler.el
@@ -615,9 +615,12 @@ return it."
615 (profiler-report-render-calltree)) 615 (profiler-report-render-calltree))
616 buffer)) 616 buffer))
617 617
618(defun profiler--xref-backend () 'elisp)
619
618(define-derived-mode profiler-report-mode special-mode "Profiler-Report" 620(define-derived-mode profiler-report-mode special-mode "Profiler-Report"
619 "Profiler Report Mode." 621 "Profiler Report Mode."
620 (add-to-invisibility-spec '(profiler . t)) 622 (add-to-invisibility-spec '(profiler . t))
623 (add-hook 'xref-backend-functions #'profiler--xref-backend nil t)
621 (setq buffer-read-only t 624 (setq buffer-read-only t
622 buffer-undo-list t 625 buffer-undo-list t
623 truncate-lines t)) 626 truncate-lines t))