commit 4566ec687f1212d875c723019722a277ca93560e parent 0b299c6d20c2bc70211714e5552d0093ece465f3 Author: dwrz <dwrz@dwrz.net> Date: Wed, 6 Feb 2019 11:03:57 +0000 Refactor elisp/leap Diffstat:
| M | elisp/leap/leap.el | | | 6 | +++--- |
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/elisp/leap/leap.el b/elisp/leap/leap.el @@ -8,9 +8,9 @@ (defun leap-year-p (year) "Return whether a given year is a leap-year." - (when (= (mod year 4) 0) - (if (= (mod year 100) 0) - (when (= (mod year 400) 0) t) + (when (zerop (mod year 4)) + (if (zerop (mod year 100)) + (when (zerop (mod year 400)) t) t))) ;;; leap.el ends here