parent
c75f6155cf
commit
8c0fbca360
|
@ -0,0 +1,17 @@
|
||||||
|
! Copyright (C) 2015 Nicolas Pénet.
|
||||||
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
|
USING: accessors colors.constants kernel ui.pens.solid ;
|
||||||
|
IN: ui.gadgets.lines
|
||||||
|
|
||||||
|
<PRIVATE
|
||||||
|
|
||||||
|
CONSTANT: line-color COLOR: grey75
|
||||||
|
|
||||||
|
PRIVATE>
|
||||||
|
|
||||||
|
: with-lines ( track -- track )
|
||||||
|
dup orientation>> >>gap
|
||||||
|
line-color <solid> >>interior ;
|
||||||
|
|
||||||
|
: white-interior ( track -- track )
|
||||||
|
COLOR: white <solid> >>interior ;
|
Loading…
Reference in New Issue