1 |
commit: 197e833501a270c0f828eb097eacb14679ae1ba2 |
2 |
Author: Ulrich Müller <ulm <AT> gentoo <DOT> org> |
3 |
AuthorDate: Sun May 1 17:11:21 2022 +0000 |
4 |
Commit: Ulrich Müller <ulm <AT> gentoo <DOT> org> |
5 |
CommitDate: Sun May 1 17:11:21 2022 +0000 |
6 |
URL: https://gitweb.gentoo.org/proj/eselect.git/commit/?id=197e8335 |
7 |
|
8 |
Fix a byte-compile warning in eselect-mode |
9 |
|
10 |
* misc/eselect-mode.el (eselect-mode): For GNU Emacs, use |
11 |
write-contents-functions instead of obsolete write-contents-hooks. |
12 |
|
13 |
Signed-off-by: Ulrich Müller <ulm <AT> gentoo.org> |
14 |
|
15 |
ChangeLog | 5 +++++ |
16 |
misc/eselect-mode.el | 9 +++++---- |
17 |
2 files changed, 10 insertions(+), 4 deletions(-) |
18 |
|
19 |
diff --git a/ChangeLog b/ChangeLog |
20 |
index 8089935..83b0289 100644 |
21 |
--- a/ChangeLog |
22 |
+++ b/ChangeLog |
23 |
@@ -1,3 +1,8 @@ |
24 |
+2022-05-01 Ulrich Müller <ulm@g.o> |
25 |
+ |
26 |
+ * misc/eselect-mode.el (eselect-mode): For GNU Emacs, use |
27 |
+ write-contents-functions instead of obsolete write-contents-hooks. |
28 |
+ |
29 |
2022-01-08 Ulrich Müller <ulm@g.o> |
30 |
|
31 |
* configure.ac: Update version to 1.4.20. |
32 |
|
33 |
diff --git a/misc/eselect-mode.el b/misc/eselect-mode.el |
34 |
index 667411b..50e88d6 100644 |
35 |
--- a/misc/eselect-mode.el |
36 |
+++ b/misc/eselect-mode.el |
37 |
@@ -1,6 +1,6 @@ |
38 |
;;; eselect-mode.el --- edit eselect files |
39 |
|
40 |
-;; Copyright 2006-2020 Gentoo Authors |
41 |
+;; Copyright 2006-2022 Gentoo Authors |
42 |
|
43 |
;; Author: Matthew Kennedy <mkennedy@g.o> |
44 |
;; Diego Pettenò <flameeyes@g.o> |
45 |
@@ -107,9 +107,10 @@ |
46 |
;;;###autoload |
47 |
(define-derived-mode eselect-mode shell-script-mode "Eselect" |
48 |
"Major mode for .eselect files." |
49 |
- (if (featurep 'xemacs) |
50 |
- (make-local-hook 'write-contents-hooks)) |
51 |
- (add-hook 'write-contents-hooks 'eselect-mode-before-save t t) |
52 |
+ (if (not (featurep 'xemacs)) |
53 |
+ (add-hook 'write-contents-functions 'eselect-mode-before-save t t) |
54 |
+ (make-local-hook 'write-contents-hooks) |
55 |
+ (add-hook 'write-contents-hooks 'eselect-mode-before-save t t)) |
56 |
(sh-set-shell "bash") |
57 |
(setq tab-width 4) |
58 |
(setq indent-tabs-mode t)) |