diff --git a/src/shared/conbuf.pas b/src/shared/conbuf.pas
index a3a7ecde8c1a53f7ee7da6e1849b69f5618e1dfb..44ec2a8f780afacd378be030352c2f1a925b4eaf 100644 (file)
--- a/src/shared/conbuf.pas
+++ b/src/shared/conbuf.pas
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 3 of the License, or
- * (at your option) any later version.
+ * the Free Software Foundation, version 3 of the License ONLY.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
var
conbufDumpToStdOut: Boolean = false;
conbufConPrefix: Boolean = true;
-
+ conbufStdOutRawMode: Boolean = false;
implementation
if conbufConPrefix then write(stdout, 'CON: ');
needCon := false;
end;
+ if conbufStdOutRawMode and (buf[np] = #10) then
+ write(stdout, #13); // force carriage return in raw mode
write(stdout, buf[np]);
needCon := (buf[np] = #10);
end;