From: ian <ian>
Date: Mon, 14 Jul 2008 22:19:33 +0000 (+0000)
Subject: get suppression of pings to lputs right
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=b60409dec8d8f9415afeb35b605f44c3fa8d849b;p=trains.git

get suppression of pings to lputs right
---

diff --git a/hostside/multiplex b/hostside/multiplex
index a15dcda..c36c2f7 100755
--- a/hostside/multiplex
+++ b/hostside/multiplex
@@ -85,7 +85,7 @@ proc cmderr {ecode emsg} { error $emsg "" [list TRAIN CMDERR $ecode] }
 
 proc lputs {m} {
     if {[regexp \
- {^\<[<&] picioh (?:in msg|out) 8[09a-f]|^\<[<&] picio (?:in pong|out ping)} \
+ {^\<[<&] picioh (?:in msg|out) 8[89a-f]|^\<[<&] picio (?:in pong|out ping)} \
             $m]} \
 	return
     puts $m