Optimized prompt output upon cancel
This commit is contained in:
parent
46a87b3e0c
commit
02625fca66
|
@ -54,11 +54,10 @@ begin
|
|||
Write(ADefault);
|
||||
end;
|
||||
|
||||
if c = #13 then
|
||||
Writeln;
|
||||
|
||||
if c = ^C then
|
||||
Result := ''; //Pretend that nothing happened.
|
||||
|
||||
Writeln; //Always end the line
|
||||
end;
|
||||
|
||||
end.
|
||||
|
|
Loading…
Reference in New Issue