# ---------------------------------------------------------------------- | |
# DEMO: timeentry in [incr Widgets] | |
# ---------------------------------------------------------------------- | |
package require Iwidgets 4.0 | |
iwidgets::timeentry .de -labeltext "Time:" | |
pack .de -fill x -expand yes -padx 10 -pady 10 |