FIXED: Don't change hooks globally

* sweeprolog.el (sweeprolog-mode): Extend 'kill-buffer-hook' and
'context-menu-functions' locally rather than global.

diff --git a/sweeprolog.el b/sweeprolog.el
index 1f22c932604cca585f59d89816a314db34266b4a..e7b0a4f588cfa45850a3a3a4617fb01adb046ac6 100644 (file)
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -4446,14 +4446,15 @@ certain contexts to maintain conventional Prolog layout."
     (add-hook 'kill-buffer-hook
               (lambda ()
                 (when (timerp sweeprolog--timer)
-                  (cancel-timer sweeprolog--timer)))))
+                  (cancel-timer sweeprolog--timer)))
+              nil t))
   (when sweeprolog-enable-cursor-sensor
     (add-hook 'sweeprolog-analyze-region-fragment-hook
               #'sweeprolog-analyze-fragment-variable nil t)
     (cursor-sensor-mode 1))
   (when (boundp 'context-menu-functions)
     (add-hook 'context-menu-functions
-              #'sweeprolog-context-menu-function))
+              #'sweeprolog-context-menu-function nil t))
   (unless (member 'sweeprolog-hole yank-excluded-properties)
    (setq-local yank-excluded-properties
                (cons 'sweeprolog-hole yank-excluded-properties))))