#!../wafe --f

Command c topLevel \
  callback {popup fs none}

FileSelection fs c \
  filter *.tcl \
  okCallback {puts stderr {Hi man, it's working <%s>}}

realize


