branch: externals/compat
commit 31e07734757b039a52e9fe01000f70a7d8027e62
Author: Philip Kaludercic <[email protected]>
Commit: Philip Kaludercic <[email protected]>
Do not pass more than two argument to <= in date-days-in-month
---
compat-27.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/compat-27.el b/compat-27.el
index 43abe687e7..eb2b22b9c5 100644
--- a/compat-27.el
+++ b/compat-27.el
@@ -589,7 +589,9 @@ The return value is a string (or nil in case we can’t find
it)."
(compat-defun date-days-in-month (year month)
"The number of days in MONTH in YEAR."
:feature 'time-date
- (unless (and (numberp month) (<= 1 month 12))
+ (unless (and (numberp month)
+ (<= 1 month)
+ (<= month 12))
(error "Month %s is invalid" month))
(if (= month 2)
(if (date-leap-year-p year)