소스 검색

+ Small cosmetic fix in log function

michael 24 년 전
부모
커밋
66ef7657db
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  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;