Fix highlighting for nonexistent Prolog flag names

diff --git a/sweeprolog.el b/sweeprolog.el
index e65e19702d6bfe936d8ab32215a25da8d62c727d..4a180ee20d7ca3682f60d270f0aae2efa6632276 100644 (file)
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -2141,7 +2141,7 @@ resulting list even when found in the current clause."
     ("flag_name"
      (list (list beg end 'sweeprolog-flag-name)))
     ("no_flag_name"
-     (list (list beg end 'sweeprolog-flag-name)))
+     (list (list beg end 'sweeprolog-no-flag-name)))
     ("ext_quant"
      (list (list beg end 'sweeprolog-ext-quant)))
     ("atom"