source stooop.tcl
namespace import stooop::*
source switched.tcl
source scwoop.tcl
source scwoutil.tcl
source bindings.tcl
source widgetip.tcl
source scroll.tcl
source scroller.tcl
source confint.tcl
source notebook.tcl

. configure -highlightbackground black -highlightthickness 1
set options [new configurationInterface .]
set book [new notebook [configurationInterface::container $options] -columns 3 -font helvetica -expand 1]
pack $widget::($book,path) -fill both -expand 1
configurationInterface::manage $options $book

foreach color {red green blue cyan yellow magenta} {
    set frame [notebook::newPage $book $color]
    pack [frame $frame.frame -background $color -width 100 -height 100] -padx 10 -pady 10 -fill both -expand 1
}
