1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-04 08:47:11 +00:00

Make font locking work in mercury-mode

* lisp/progmodes/prolog.el (prolog-font-lock-keywords): Work in
all modes derived from prolog-mode (bug#45747).
(mercury-mode): Set up variables based on the Prolog system (bug#45747).

Copyright-paperwork-exempt: yes
This commit is contained in:
k3tu0isui 2021-01-10 14:36:51 +01:00 committed by Lars Ingebrigtsen
parent 25dadca0d1
commit 918a5eae17

View File

@ -1201,7 +1201,9 @@ Commands:
(define-derived-mode mercury-mode prolog-mode "Prolog[Mercury]"
"Major mode for editing Mercury programs.
Actually this is just customized `prolog-mode'."
(setq-local prolog-system 'mercury))
(setq-local prolog-system 'mercury)
;; Run once more to set up based on `prolog-system'
(prolog-mode-variables))
;;-------------------------------------------------------------------
@ -2082,7 +2084,7 @@ Argument BOUND is a buffer position limiting searching."
(delq
nil
(cond
((eq major-mode 'prolog-mode)
((derived-mode-p 'prolog-mode)
(list
head-predicates
head-predicates-1