From: ian <ian>
Date: Sun, 13 Jul 2008 23:54:16 +0000 (+0000)
Subject: fix it to work with empty config file
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=2a8ae0f2a23de4a173f12400ce049dc169cbce43;p=trains.git

fix it to work with empty config file
---

diff --git a/hostside/gui b/hostside/gui
index 1cccbab..ae99e75 100755
--- a/hostside/gui
+++ b/hostside/gui
@@ -880,7 +880,8 @@ proc engage-server {} {
 }
 
 proc main {} {
-    global pages cpage configfile
+    global pages cpage configfile input_bindings
+    set input_bindings {}
     setting server railway {[[0-9a-z:].*}
     setting geometry {} {[-+]\d+[-+]\d+}
     setting posdeviation 10 {\d+}
@@ -891,7 +892,7 @@ proc main {} {
     setting scaninputinterval 500 {\d+}
 
     set hostname [lindex [split [info hostname] .] 0]
-    setting configfile gui-$hostname.config {^.}
+    setting configfile gui-$hostname.config {.+}
     parse-argv {}
     uplevel #0 source gui-layout.config
     uplevel #0 source $configfile