paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-04 18:07:13 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ Small cosmetic fix in log function

Browse Source
This commit is contained in:
michael 2001-10-03 21:54:39 +00:00
parent 6e9bfb8c1f
commit 66ef7657db
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
docs/kbdex/logkeys.pp
View File

@ -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;