diff --git a/rtl/dos/crt.pp b/rtl/dos/crt.pp
index 87e77ce541..bd2b005304 100644
--- a/rtl/dos/crt.pp
+++ b/rtl/dos/crt.pp
@@ -858,8 +858,10 @@ begin
    { redirect the standard output }
    assigncrt(Output);
    Rewrite(Output);
+   TextRec(Output).Handle:=StdOutputHandle;
    assigncrt(Input);
    Reset(Input);
+   TextRec(Input).Handle:=StdInputHandle;
 
    { calculates delay calibration }
    initdelay;
@@ -867,7 +869,10 @@ end.
 
 {
   $Log$
-  Revision 1.3  1998-05-27 00:19:16  peter
+  Revision 1.4  1998-05-28 10:21:38  pierre
+    * Handles of input and output restored
+
+  Revision 1.3  1998/05/27 00:19:16  peter
     * fixed crt input
 
   Revision 1.2  1998/05/21 19:30:46  peter