diff --git a/mdetach.c b/mdetach.c
index 0a8b1b1..956e7ea 100644
--- a/mdetach.c
+++ b/mdetach.c
@@ -13,12 +13,14 @@ int mdetach(Entry *e, void *p1, void *p2, void *p3, void *p4, void *p5)
     // TODO -- SO_LINGER/SO_LINGER_SEC
     LongWord timeout;
     
-    timeout = GetTick() + 5 * 60;
-    SEI();
+    timeout = 0; // GetTick() + 120 * 60;
+    IncBusy();
+    TCPIPCloseTCP(e->ipid);
+    
     e->command = kCommandDisconnectAndLogout;
     e->cookie = 0;
     e->timeout = timeout;
-    CLI();
+    DecBusy();
     
     return 0; 
 }
\ No newline at end of file