From 0fef4290a6c6ba97f45473b5e24676e5a1245029 Mon Sep 17 00:00:00 2001
From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org>
Date: Tue, 27 Jan 1998 07:25:22 +0100
Subject: [PATCH] bugfix

Rev: lib/modules/Calendar.pmod/Gregorian.pmod:1.7
---
 lib/modules/Calendar.pmod/Gregorian.pmod | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/modules/Calendar.pmod/Gregorian.pmod b/lib/modules/Calendar.pmod/Gregorian.pmod
index e9dbbb72a8..2cf270882e 100644
--- a/lib/modules/Calendar.pmod/Gregorian.pmod
+++ b/lib/modules/Calendar.pmod/Gregorian.pmod
@@ -864,7 +864,7 @@ class Day
    {
       int n;
       object ye=this->year();
-      n=(-({-1,-2,-3,3,2,1,0})[this->year()->julian_day(0)%7]+d)/7+1;
+      n=(-({-1,-2,-3,-4,2,1,0})[this->year()->julian_day(0)%7]+d)/7+1;
       if (n>ye->number_of_weeks())
 	 return ye->next()->week(1);
       else if (n<=0)
-- 
GitLab