branch: externals/compat
commit 965fff2db0d15ddd074ede8efa030f9032d4f4eb
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Add :extended version check
---
compat-macs.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/compat-macs.el b/compat-macs.el
index b46a4108bb..4ba7cc1d57 100644
--- a/compat-macs.el
+++ b/compat-macs.el
@@ -97,6 +97,9 @@ REST are attributes and the function BODY."
:body t)
(lambda (extended obsolete body)
(when (stringp extended)
+ (compat-macs--assert
+ (and (version< extended compat-macs--version) (version< "24.4"
extended))
+ "Invalid :extended version %s for %s %s" extended type name)
(setq extended (version<= extended emacs-version)))
(compat-macs--strict (eq extended (fboundp name))
"Wrong :extended flag for %s %s" type name)
