From c7ab2942e9c059695cc89cb6714e53db37199bf3 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Sat, 8 Jan 2011 21:32:47 +0000
Subject: [PATCH] gui: set all movpos to unknown in state Resolving

---
 hostside/gui | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/hostside/gui b/hostside/gui
index de7440d..13a73fe 100755
--- a/hostside/gui
+++ b/hostside/gui
@@ -176,6 +176,13 @@ proc movpos-button-sstate {mid posn} {
     movpos-button-setdisplay $mid
 }
 
+proc movpos-all-unknown {} {
+    global mp_details
+    foreach mid [array names mp_details] {
+	movpos-button-sstate $mid ?
+    }
+}
+
 proc widgets-movpos {} {
     global mp_details
     foreach mid [array names mp_details] {
@@ -559,6 +566,9 @@ proc speedws-stastate-hook {} {
 	    set trains [array names train_commanded]
 	    speedws-forall speedw-trains-available $trains
 	}
+	Resolving {
+	    movpos-all-unknown
+	}
 	Finalising {
 	    speedws-forall speedw-notrains "($stastate)"
 	}
-- 
2.30.2