mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-04-05 13:37:47 +02:00
* fix compilation of Tetris demo
This commit is contained in:
parent
cbcbf73cbf
commit
7944be97f0
@ -627,7 +627,7 @@ Var
|
||||
S : String;
|
||||
begin
|
||||
Result:=true;
|
||||
S:=aEvent.currentTarget.ID;
|
||||
S:=aEvent.currentTargetElement.ID;
|
||||
aEvent.preventDefault;
|
||||
if Copy(S,1,Length(SControl))=SControl then
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user