From 26a4cac9e9de988d267000d81c8bafdb6b343ecc Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Tue, 6 Jun 2000 13:51:18 +0000
Subject: [PATCH]   * 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)

---
 rtl/linux/crt.pp | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/rtl/linux/crt.pp b/rtl/linux/crt.pp
index f1106b7004..d674214986 100644
--- a/rtl/linux/crt.pp
+++ b/rtl/linux/crt.pp
@@ -1369,7 +1369,7 @@ Begin
             begin
               F.BufPtr^[i] := #10;
               if not(OutputRedir or InputRedir) then
-                write(#13);
+                write(#10);
               inc(i);
             end;
           else
@@ -1662,7 +1662,12 @@ Begin
 End.
 {
   $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
     work on Linux textmode console, as the sound is created using special
     Linux terminal IOCTLs.