variable probabilities

[trains.git] / hostside / eventrun.procs

diff --git a/hostside/eventrun.procs b/hostside/eventrun.procs
index fa2739ad99ddbd736735e2d785cc83047ea36450..450b00fd08a8fcc4f7a38df389125611a8b6b4d0 100644 (file)
--- a/hostside/eventrun.procs
+++ b/hostside/eventrun.procs
@@ -25,6 +25,7 @@ proc tw {args} {
     if {![info exists trainsf]} return
     if {[catch {
        puts $trainsf $args
+       puts $trainsf ask_show
     } emsg]} {
        puts stderr "tw: $emsg"
        trains_stop