branch: elpa/datetime
commit f043bb9c083d401a3e1ef5558b40770a53c57e68
Author: Paul Pogonyshev <pogonys...@gmail.com>
Commit: Paul Pogonyshev <pogonys...@gmail.com>

    When `bool-vector' is unavailable due to too old Emacs, fall back to 
`vector'.
---
 datetime.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/datetime.el b/datetime.el
index e641cabd51..e9fb08f897 100644
--- a/datetime.el
+++ b/datetime.el
@@ -377,7 +377,7 @@ when necessary."
   (aref (eval-when-compile (let (result)
                              (dotimes (year 400)
                                (push (and (= (% year 4) 0) (or (/= (% year 
100) 0) (= (% year 400) 0))) result))
-                             (apply #'bool-vector (nreverse result))))
+                             (apply (if (fboundp #'bool-vector) #'bool-vector 
#'vector) (nreverse result))))
         (mod year 400)))
 
 (defconst datetime--gregorian-cumulative-year-days (let ((days 0)

Reply via email to