From 307b6f935318b7de23feeba72f66e6fecb0e79d0 Mon Sep 17 00:00:00 2001
From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 25 Sep 2020 16:06:35 +0200
Subject: [PATCH] Partially revert previous prolog.el cleanup

* lisp/progmodes/prolog.el (prolog-font-lock-keywords): Partially
revert previous patch -- we want the prolog-warning-face symbol,
not its value.
---
 lisp/progmodes/prolog.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el
index a82fd388031..124f652ed69 100644
--- a/lisp/progmodes/prolog.el
+++ b/lisp/progmodes/prolog.el
@@ -1997,7 +1997,7 @@ Argument BOUND is a buffer position limiting searching."
          (if (eq prolog-system 'mercury)
              (list
               (regexp-opt prolog-directives-i 'words)
-              0 prolog-warning-face)))
+              0 'prolog-warning-face)))
         ;; Inferior mode specific patterns
         (prompt
          ;; FIXME: Should be handled by comint already.
-- 
2.39.5