proc required {} {
global glyphsdone unk_l unk_r unk_contexts
+
+ fileevent stdin readable {}
+ fconfigure stdin -blocking yes
if {[gets stdin l]<0} {
if {[eof stdin]} { fconfigure stdin -blocking yes; exit 0 }
set glyphsdone [lrange $l 3 end]
debug "GOT $l"
- fileevent stdin readable {}
- fconfigure stdin -blocking yes
-
read_xpm stdin
resize_widgets_core