From: Philip Kaludercic <philipk@posteo.net>
Date: Fri, 27 Oct 2023 16:58:55 +0000 (+0200)
Subject: Setup Xref in 'sweeprolog-top-level-mode'
X-Git-Tag: V9.1.17-0.26.1~2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4d1bb198d89b111bfcd20a7bfa81ae2006599396;p=sweep.git

Setup Xref in 'sweeprolog-top-level-mode'

* sweeprolog.el (sweeprolog-top-level-mode): Add
'sweeprolog--xref-backend' to 'xref-backend-functions'.
---

diff --git a/sweeprolog.el b/sweeprolog.el
index 665d7e3..0f56047 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -3575,6 +3575,7 @@ GOAL.  Otherwise, GOAL is set to a default value specified by
   (add-hook 'post-self-insert-hook #'sweeprolog-top-level--post-self-insert-function nil t)
   (add-hook 'completion-at-point-functions #'sweeprolog-completion-at-point nil t)
   (add-hook 'after-change-functions #'sweeprolog-colourise-query nil t)
+  (add-hook 'xref-backend-functions #'sweeprolog--xref-backend nil t)
   (when (and (member sweeprolog-faces-style '(light dark))
              (not (custom-theme-enabled-p 'sweeprolog-pce)))
     (load-theme 'sweeprolog-pce t)