branch: elpa/tuareg
commit a04ffbaf7e068c3cb45d9502ea897e4437217ad4
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
Fix compilation warnings so the CI tests pass again
* tuareg.el (tuareg-font-lock-label-face): Remove odd `keep` element.
* ocamldebug.el (ocamldebug-event): Use `:inverse-video`.
---
ocamldebug.el | 2 +-
tuareg.el | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/ocamldebug.el b/ocamldebug.el
index 5639c45933..66815ecb93 100644
--- a/ocamldebug.el
+++ b/ocamldebug.el
@@ -83,7 +83,7 @@
"If non-nil, always display current frame position in another window.")
(defface ocamldebug-event
- '((t :invert t))
+ '((t :inverse-video t))
"Face to highlight the first/last char of current event."
:group 'tuareg)
diff --git a/tuareg.el b/tuareg.el
index 4d199279e8..a2b9640276 100644
--- a/tuareg.el
+++ b/tuareg.el
@@ -1,7 +1,7 @@
;;; tuareg.el --- OCaml mode -*- coding: utf-8; lexical-binding:t -*-
;; Copyright (C) 1997-2006 Albert Cohen, all rights reserved.
-;; Copyright (C) 2011-2023 Free Software Foundation, Inc.
+;; Copyright (C) 2011-2025 Free Software Foundation, Inc.
;; Copyright (C) 2009-2010 Jane Street Holding, LLC.
;; Author: Albert Cohen <albert.co...@inria.fr>
@@ -371,7 +371,7 @@ Valid names are `browse-url', `browse-url-firefox', etc."
(tuareg--obsolete-face-var tuareg-font-lock-constructor-face)
(defface tuareg-font-lock-label-face
- '((t (:inherit font-lock-constant-face keep)))
+ '((t (:inherit font-lock-constant-face))) ;; keep?
"Face description for labels."
:group 'tuareg-faces)
(tuareg--obsolete-face-var tuareg-font-lock-label-face)
