global realtime_retry dev_railway
if {![info exists realtime_retry]} return
if {[llength $realtime_retry]} { error "huh? $realtime_retry" }
- set serchan [open $dev_railway r+]
+ set serchan [open $dev_railway {RDWR NOCTTY NONBLOCK}]
fconfigure $serchan -translation binary -buffering none -blocking 0
fileevent $serchan readable realtime-retry-serchan-readable
set after [after 500 realtime-retry-send-ping]