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

USING: accessors colors.constants sequences tools.test
ui.gadgets ui.gadgets.labeled ;

{ t } [
    <gadget> "Hey" <labeled-gadget> content>> gadget?
] unit-test
ui.gadgets.labeled: Fix a random failing unit test. 2017-12-09 05:02:11 -05:00			`USING: accessors colors.constants sequences tools.test`
			`ui.gadgets ui.gadgets.labeled ;`
Fix a bug in ui.gadgets.labeled and add a unit test 2009-03-14 01:01:18 -04:00
ui.gadgets: fix some tests. 2015-08-16 13:41:16 -04:00			`{ t } [`
ui.gadgets.labeled: make <labeled-gadget> not take a color. This allows backwards compatibility with 0.97 API. Adding <colored-labeled-gadget> for a version with a colored divider and implementing it with a gap between title bar and content intead of a shelf border gadget. 2018-02-11 12:52:00 -05:00			`<gadget> "Hey" <labeled-gadget> content>> gadget?`
ui.gadgets: fix some tests. 2015-08-16 13:41:16 -04:00			`] unit-test`