Sfoglia il codice sorgente

+ Small cosmetic fix in log function

michael 24 anni fa
parent
commit
66ef7657db
1 ha cambiato i file con 2 aggiunte e 2 eliminazioni
  1. 2 2
      docs/kbdex/logkeys.pp

+ 2 - 2
docs/kbdex/logkeys.pp

@@ -54,8 +54,8 @@ begin
   K:=OldkeyboardDriver.GetKeyEvent();
   If Logging then
     begin
-    Write(KeyLog,TimeStamp);
-    Writeln(KeyLog,': Key event: ',KeyEventToString(TranslateKeyEvent(K)));
+    Write(KeyLog,TimeStamp,': Key event: ');
+    Writeln(KeyLog,KeyEventToString(TranslateKeyEvent(K)));
     end;
   LogGetKeyEvent:=K;  
 end;