Browse Source

* fixed linefeed problem with new crtread (I wrote #13 instead of #10 to
the screen, causing the cursor to jump to the start of the current
line instead of to the next line)

Jonas Maebe 25 years ago
parent
commit
26a4cac9e9
1 changed files with 7 additions and 2 deletions
  1. 7 2
      rtl/linux/crt.pp

+ 7 - 2
rtl/linux/crt.pp

@@ -1369,7 +1369,7 @@ Begin
             begin
             begin
               F.BufPtr^[i] := #10;
               F.BufPtr^[i] := #10;
               if not(OutputRedir or InputRedir) then
               if not(OutputRedir or InputRedir) then
-                write(#13);
+                write(#10);
               inc(i);
               inc(i);
             end;
             end;
           else
           else
@@ -1662,7 +1662,12 @@ Begin
 End.
 End.
 {
 {
   $Log$
   $Log$
-  Revision 1.28  2000-06-06 08:22:41  sg
+  Revision 1.29  2000-06-06 13:51:18  jonas
+    * fixed linefeed problem with new crtread (I wrote #13 instead of #10 to
+      the screen, causing the cursor to jump to the start of the current
+      line instead of to the next line)
+
+  Revision 1.28  2000/06/06 08:22:41  sg
   * Implemented "Sound" and "NoSound". Please notice that these normally only
   * Implemented "Sound" and "NoSound". Please notice that these normally only
     work on Linux textmode console, as the sound is created using special
     work on Linux textmode console, as the sound is created using special
     Linux terminal IOCTLs.
     Linux terminal IOCTLs.