wm title . "Watch Example"

##=========================================================
##	Create a Watch iwidget
##=========================================================
##
iwidgets::watch .w \
  -clockcolor #82E6C8 \
  -hourcolor black \
  -minutecolor black \
  -secondcolor red \
  -pivotcolor #bbbbbb

pack .w \
  -fill both \
  -expand true

##
##	display the current time
##
.w show