From e945c65255b470e02ae12db2ac32a684395325ec Mon Sep 17 00:00:00 2001 From: Margers <margers.roked@inbox.lv> Date: Wed, 11 Sep 2024 01:56:04 +0000 Subject: [PATCH] Remove redundant ctrl-c enable and disable. --- packages/ide/wconsole.pas | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/packages/ide/wconsole.pas b/packages/ide/wconsole.pas index 8b8960aeff..030470c7f2 100644 --- a/packages/ide/wconsole.pas +++ b/packages/ide/wconsole.pas @@ -74,10 +74,7 @@ Begin IntToStr(GetLastError),0,0); {$endif Windows} {$ifdef go32v2} - if djgpp_set_ctrl_c(false) then - ConsoleMode:=1 - else - ConsoleMode:=0; + ConsoleMode:=0; {$endif go32v2} {$ifdef netware} ConsoleMode:=0; @@ -94,9 +91,6 @@ Begin DebugMessage('','Call to SetConsoleMode failed, GetLastError='+ IntToStr(GetLastError),0,0); {$endif Windows} -{$ifdef go32v2} - djgpp_set_ctrl_c((ConsoleMode and 1)<>0); -{$endif go32v2} End; end.