stub direction setter

diff --git a/hostside/gui b/hostside/gui
index d854b20ed6381163973b4efffd0e710c50ba131c..b946d43fb50c8c2c5cf7bee0ddd49a9467e57f3a 100755 (executable)
--- a/hostside/gui
+++ b/hostside/gui
@@ -396,6 +396,10 @@ proc speedw-train-selected {w t} {
     $w.speed configure -foreground white
 }
 
+proc speedw-train-direction {w dirchange} {
+    # fixme nyi
+}
+
 proc speedw-trains-available {w l} {
     upvar #0 speed/$w s
     if {![llength $l]} { speedw-train-noneselected $w "(no trains)"; return }