Преглед на файлове

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

Michaël Van Canneyt преди 1 месец
родител
ревизия
84f3c4908a
променени са 1 файла, в които са добавени 4 реда и са изтрити 4 реда
  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;