snit test failures

In the tcllib 1.6 release,
with Tcl/Tk 8.4.6 on Solaris 9:

- snit 0.93

==== install-2.2 Delegate option * for a shadowed
option. Foreground is declared
as a non-delegated option, hence it will pick up
the option database
default. -foreground is not included in the
"delegate option *", so
the text widget's -foreground option will not be
set from the
option database. FAILED
==== Contents of test case:

cleanup

widget myframe {
option -foreground white
delegate option * to text

typeconstructor {
option add *Myframe.foreground red
}

constructor {args} {
install text using text $win.text
}

method getit {} {
$text cget -foreground
}
}

myframe .frm
set a [.frm cget -foreground]
set b [.frm getit]
destroy .frm
tkbide

list $a $b

---- Result was:
red #000000000000
---- Result should have been (exact matching):
red Black
==== install-2.2 FAILED

==== widgetclass-1.6 implicit widgetclass applied to
hull FAILED
==== Contents of test case:

cleanup

widget dog {
typeconstructor {
option add *Dog.background green widgetDefault
}

method background {} {
$hull cget -background
}
}

dog .dog

set bg [.dog background]

destroy .dog

set bg

---- Result was:
#FF00D6009000
---- Result should have been (exact matching):
green
==== widgetclass-1.6 FAILED

==== widgetclass-1.7 explicit widgetclass applied to
hull FAILED
==== Contents of test case:

cleanup

widget dog {
widgetclass DogWidget

typeconstructor {
option add *DogWidget.background green
widgetDefault
}

method background {} {
$hull cget -background
}
}

dog .dog

set bg [.dog background]

destroy .dog

set bg

---- Result was:
#FF00D6009000
---- Result should have been (exact matching):
green
==== widgetclass-1.7 FAILED