|
@@ -481,11 +481,7 @@ Var
|
|
Procedure StartLog;
|
|
Procedure StartLog;
|
|
|
|
|
|
begin
|
|
begin
|
|
-{$if defined(win32) or defined(win64)}
|
|
|
|
- Assign(FL,'c:\service.log');
|
|
|
|
-{$else}
|
|
|
|
- Assign(FL,'/tmp/service.log');
|
|
|
|
-{$endif}
|
|
|
|
|
|
+ Assign(FL,GetTempDir+'service.log');
|
|
Rewrite(FL);
|
|
Rewrite(FL);
|
|
InitCriticalSection(LCS);
|
|
InitCriticalSection(LCS);
|
|
DebugLog('Start logging');
|
|
DebugLog('Start logging');
|