Bladeren bron

* Removed wrong ELSE (bug id 25836)

git-svn-id: trunk@27072 -
michael 11 jaren geleden
bovenliggende
commit
0e61b5b6c1
1 gewijzigde bestanden met toevoegingen van 2 en 3 verwijderingen
  1. 2 3
      packages/rtl-objpas/src/inc/dateutil.inc

+ 2 - 3
packages/rtl-objpas/src/inc/dateutil.inc

@@ -1610,9 +1610,8 @@ begin
         begin
         Inc(YEDOW);
         if (YEDOW>7) then
-          YEDOW:=1
-        else
-      end;
+          YEDOW:=1;
+        end;
       if (YEDOW<4) then // Really next year.
         begin
         Inc(AYear);