irdecoderunit.pas verwendet jetzt mkTemp

1 files changed, 5 insertions, 2 deletions

diff --git a/irdecoderunit.pas b/irdecoderunit.pas
index 314193d..c60b42b 100644
--- a/irdecoderunit.pas
+++ b/irdecoderunit.pas
@@ -73,7 +73,8 @@ var
 
 constructor tIRDecoder.create(inputName, konfigName: string; watte, debug: boolean);
 var
-  i: longint;
+  i:      longint;
+  tmpDir: string;
 begin
   inherited create;
   if (length(zeichenTabelle)=0) or (length(befehlsTabelle)=0) then begin
@@ -88,8 +89,10 @@ begin
   _debug:=debug;
 
   if _debug then begin
-    assignFile(debugDatei,'/tmp/fernbedienung.debug');
+    tmpDir:=trim(mkTemp('-d /tmp/fernbedienung.XXXXXX'));
+    assignFile(debugDatei,tmpdir+'/debug');
     rewrite(debugDatei);
+    closefile(debugDatei);
   end;
 
   ttySLeser:=tLeseProzess.create(inputName,1);