From 49796b2ce33d03865515c938262b6f2456c97c7f Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Sun, 8 Jun 2008 23:21:31 +0000
Subject: [PATCH] do not ping immediately after crash

---
 hostside/multiplex | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hostside/multiplex b/hostside/multiplex
index 8143416..535f50a 100755
--- a/hostside/multiplex
+++ b/hostside/multiplex
@@ -289,8 +289,8 @@ proc realtime-retry-realtime-failed {} {
     set serchan [open $dev_railway r+]
     fconfigure $serchan -translation binary -buffering none -blocking 0
     fileevent $serchan readable realtime-retry-serchan-readable
-    set realtime_retry [list $serchan x {} {}]
-    realtime-retry-send-ping
+    set after [after 500 realtime-retry-send-ping]
+    set realtime_retry [list $serchan $after {} {}]
 }
 
 proc realtime-retry-send-ping {} {
-- 
2.30.2