From ef46ca477760b11009e8ea28aad52461e033e87f Mon Sep 17 00:00:00 2001 From: Sudhir Shenoy Date: Sat, 22 Jul 2017 22:19:36 +0900 Subject: [PATCH] typo corrected --- calendar.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/calendar.lisp b/calendar.lisp index 6c19004..d2418b5 100644 --- a/calendar.lisp +++ b/calendar.lisp @@ -231,7 +231,7 @@ are also generated so that the range of years is continuous" (defmethod holiday-p (date (cal calendar-union)) "True if date is a holiday in any contained calendar" - (some #'identity (lambda (cal) (holiday-p date cal)) (calendars cal))) + (some #'identity (mapcar (lambda (cal) (holiday-p date cal)) (calendars cal)))) (defmethod business-day-p (date (cal calendar)) "True if date is not a holiday or weekend in the given calendar"