branch: externals/compat
commit 68fdf2d41bda18cdec64b78e2391adde95a05bdb
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Enable byte compilation warnings also for Emacs master
We follow upstream improvements closely and profit earlier from
additional byte compiler warnings.
---
Makefile | 2 +-
compat-tests.el | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/Makefile b/Makefile
index 2368b20f8e..a438c72fb8 100644
--- a/Makefile
+++ b/Makefile
@@ -35,7 +35,7 @@ $(BYTEC): compat-macs.el
.el.elc:
@echo "Compiling $<"
@$(EMACS) -Q --batch -L . \
- --eval '(setq compat-strict t byte-compile-error-on-warn (<
emacs-major-version 30))' \
+ --eval '(setq compat-strict t byte-compile-error-on-warn t)' \
-f batch-byte-compile $<
compat.info: compat.texi
diff --git a/compat-tests.el b/compat-tests.el
index 73de95b766..2999a4fb06 100644
--- a/compat-tests.el
+++ b/compat-tests.el
@@ -883,7 +883,7 @@
(should-equal (function-alias-p 'compat-tests--alias-a)
'(compat-tests--alias-b compat-tests--alias-c))
;; Emacs 30 disallows cyclic function aliases
- (if (>= emacs-major-version 30)
+ (compat-tests--if (>= emacs-major-version 30)
(should-error
(progn
(defalias 'compat-tests--cyclic-alias-a 'compat-tests--cyclic-alias-b)
@@ -1062,7 +1062,7 @@
(insert "foo")
(goto-char 2)
(insert " ")
- (backward-delete-char 1)
+ (delete-char (- 1))
(buffer-hash))
(sha1 "foo")))
