From: Bruno Haible <bruno@clisp.org>
Date: Sat, 27 Jul 2024 20:13:02 +0000 (+0200)
Subject: po-mode: Avoid a compiler warning in Emacs 28.
X-Git-Tag: v0.23~219
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=7793b37d96e1e343585fd37c19612fcffa3aa035;p=thirdparty%2Fgettext.git

po-mode: Avoid a compiler warning in Emacs 28.

Reported by Vincent Lefèvre <vincent@vinc17.net> via Santiago Vila
at <https://lists.gnu.org/archive/html/bug-gettext/2024-06/msg00031.html>.

* gettext-tools/emacs/po-mode.el (po-mode-version-string): Bump version.
(po-mode): Use write-contents-functions instead of write-contents-hooks.
---

diff --git a/gettext-tools/emacs/po-mode.el b/gettext-tools/emacs/po-mode.el
index 6416037c5..cad2bdac7 100644
--- a/gettext-tools/emacs/po-mode.el
+++ b/gettext-tools/emacs/po-mode.el
@@ -1,6 +1,6 @@
 ;;; po-mode.el --- major mode for GNU gettext PO files
 
-;; Copyright (C) 1995-2002, 2005-2008, 2010, 2013-2017, 2019-2020, 2023 Free Software Foundation, Inc.
+;; Copyright (C) 1995-2024 Free Software Foundation, Inc.
 
 ;; Authors: François Pinard <pinard@iro.umontreal.ca>
 ;;          Greg McGary <gkm@magilla.cichlid.com>
@@ -62,7 +62,7 @@
 
 ;;; Code:
 
-(defconst po-mode-version-string "2.29" "\
+(defconst po-mode-version-string "2.30" "\
 Version number of this version of po-mode.el.")
 
 ;;; Emacs portability matters - part I.
@@ -1000,7 +1000,7 @@ all reachable through 'M-x customize', in group 'Emacs.Editing.I18n.Po'."
   (set (make-local-variable 'po-string-end) nil)
   (set (make-local-variable 'po-marking-overlay) (po-create-overlay))
 
-  (add-hook 'write-contents-hooks 'po-replace-revision-date)
+  (add-hook 'write-contents-functions 'po-replace-revision-date)
 
   (run-hooks 'po-mode-hook)
   (message (_"You may type 'h' or '?' for a short PO mode reminder.")))