}
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+}
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