2
0
Michaël Van Canneyt 1 сар өмнө
parent
commit
62cad88c85

+ 1 - 5
packages/fcl-extra/src/daemonapp.pp

@@ -481,11 +481,7 @@ Var
 Procedure StartLog;
 
 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);
   InitCriticalSection(LCS);
   DebugLog('Start logging');