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 665d7e31e619d7c063f5fb2314fef5e437f42df8..0f56047d02717764b11c590481001ea4764bc030 100644 (file)
--- 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)