Переглянути джерело

* Added ReReadTimeZone

git-svn-id: trunk@19569 -
michael 13 роки тому
батько
коміт
86c0b324fd
2 змінених файлів з 7 додано та 0 видалено
  1. 6 0
      rtl/unix/timezone.inc
  2. 1 0
      rtl/unix/unix.pp

+ 6 - 0
rtl/unix/timezone.inc

@@ -337,3 +337,9 @@ begin
   num_types:=0;
 end;
 
+Procedure ReReadLocalTime;
+
+begin
+  DoneLocalTime;
+  InitLocalTime;
+end;

+ 1 - 0
rtl/unix/unix.pp

@@ -71,6 +71,7 @@ procedure GetLocalTimezone(timer:cint;var leap_correct,leap_hit:cint);
 procedure GetLocalTimezone(timer:cint);
 procedure ReadTimezoneFile(fn:string);
 function  GetTimezoneFile:string;
+Procedure ReReadLocalTime;
 {$ENDIF}
 
 {**  Process Handling  **}