wm title . "Fileselectiondialog Example"

##=========================================================
##  Create a Fileselectiondialog iwidget
##=========================================================
##
iwidgets::fileselectiondialog .fsd \
  -mask "*.html" \
  -directory "../" \
  -fileslabel "HTML Files" \
  -dirslabel "Iwidgets HTML Dir" \
  -modality application

wm title .fsd "Fileselectiondialog Example"


##
##  Display the widget, and if Ok is clicked,
##  then print out the selection
## 
if [.fsd activate] {

  puts [.fsd get]

}