X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fconbuf.pas;h=44ec2a8f780afacd378be030352c2f1a925b4eaf;hb=63889e5f1141ac723de31ad23d8d3ca88438a76c;hp=12b0a6e71db79a8f4d9deaf16b91b2eee7ec8bb2;hpb=ae4069ace642a386dd8651379dbfb0e6330d915b;p=d2df-sdl.git diff --git a/src/shared/conbuf.pas b/src/shared/conbuf.pas index 12b0a6e..44ec2a8 100644 --- a/src/shared/conbuf.pas +++ b/src/shared/conbuf.pas @@ -1,9 +1,8 @@ -(* Copyright (C) DooM 2D:Forever Developers +(* Copyright (C) Doom 2D: Forever Developers * * 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 @@ -42,7 +41,7 @@ procedure cbufClear (); var conbufDumpToStdOut: Boolean = false; conbufConPrefix: Boolean = true; - + conbufStdOutRawMode: Boolean = false; implementation @@ -84,6 +83,8 @@ begin 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;