Browse Source

* In case of no DST, DST timezone offset must equal normal timezone offset

Michaël Van Canneyt 1 week ago
parent
commit
84f3c4908a
1 changed files with 4 additions and 4 deletions
  1. 4 4
      rtl/objpas/sysutils/tzenv.inc

+ 4 - 4
rtl/objpas/sysutils/tzenv.inc

@@ -744,10 +744,10 @@ begin
           DSTEndSec := ADSTEndSec;
           DSTStartSpecType := ADSTStartSpecType;
           DSTEndSpecType := ADSTEndSpecType;
-         end;
-       end
-      else
-       DSTOffset := -3600 + TZOffset;
+         end
+       else
+         DSTOffset := -3600 + TZOffset;
+       end;
      end;
    end;
 end;