Support Prettify Symbols and similar minor modes

* sweeprolog.el (sweeprolog-analyze-some-terms): Call
'font-lock-fontify-keywords-region' to support minor modes that
rely on 'font-lock-keywords'.

diff --git a/sweeprolog.el b/sweeprolog.el
index 655f395b5c5a1d4fe61c381d4a70737c5dc9718a..266db397d5b72543872471e2ed102514b6af53f0 100644 (file)
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -2982,7 +2982,7 @@ modified."
         (sweeprolog-end-of-top-term)
         (sweeprolog-analyze-region start (point) "true")))))
 
-(defun sweeprolog-analyze-some-terms (beg end &optional _verbose)
+(defun sweeprolog-analyze-some-terms (beg end &optional verbose)
   (let ((sweeprolog--analyze-point (point)))
    (save-match-data
      (save-mark-and-excursion
@@ -3001,6 +3001,7 @@ modified."
          (sweeprolog-end-of-top-term)
          (skip-chars-forward " \t\n")
          (sweeprolog-analyze-term cur (point))
+         (font-lock-fontify-keywords-region start (point) verbose)
          `(jit-lock-bounds ,start . ,(point)))))))
 
 (defun sweeprolog-syntax-propertize (start end)