瀏覽代碼

* restore rawmode only if not redirected

peter 21 年之前
父節點
當前提交
90f0593a8d
共有 1 個文件被更改,包括 6 次插入2 次删除
  1. 6 2
      rtl/unix/crt.pp

+ 6 - 2
rtl/unix/crt.pp

@@ -1613,7 +1613,8 @@ Initialization
 
 Finalization
   ttyFlushOutput;
-  SetRawMode(False);
+  if not OutputRedir then
+    SetRawMode(False);
 { remove console buf }
   if Assigned(ConsoleBuf) then
    FreeMem(ConsoleBuf,ScreenHeight*ScreenWidth*2);
@@ -1621,7 +1622,10 @@ Finalization
 End.
 {
   $Log$
-  Revision 1.20  2004-07-20 09:26:04  marco
+  Revision 1.21  2004-12-26 16:15:44  peter
+    * restore rawmode only if not redirected
+
+  Revision 1.20  2004/07/20 09:26:04  marco
    * some updates to xy2ansi
 
   Revision 1.19  2004/07/09 19:03:35  peter