factor/basis/ui/gadgets/labeled/labeled-tests.factor

IN: ui.gadgets.labeled.tests
USING: ui.gadgets ui.gadgets.labeled accessors tools.test ;

{ t } [ <gadget> "Hey" <labeled-gadget> content>> gadget? ] unit-test
Fix a bug in ui.gadgets.labeled and add a unit test 2009-03-14 01:01:18 -04:00			`IN: ui.gadgets.labeled.tests`
			`USING: ui.gadgets ui.gadgets.labeled accessors tools.test ;`

factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test 2015-07-03 12:39:59 -04:00			`{ t } [ <gadget> "Hey" <labeled-gadget> content>> gadget? ] unit-test`