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.

diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el
index a82fd388031ad787478b78c9fdff96a20436e398..124f652ed69df04e6130525c39f8bc872c297049 100644 (file)
--- 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.