Optimized prompt output upon cancel

This commit is contained in:
2015-09-28 11:13:04 +02:00
parent 46a87b3e0c
commit 02625fca66
+2 -3
View File
@@ -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.