Lines Matching refs:outline
30 set outline black
32 .t.c create arc 20 20 220 120 -start 30 -extent 270 -outline $fill1 -width 14 \
35 -style chord -outline $outline
37 -style chord -outline $outline -outlinestipple gray50
39 -style pieslice -outline $outline
41 -style pieslice -outline $outline
43 -style chord -outline $outline -stipple gray50 -outlinestipple gray25
45 -style chord -outline $outline
47 -style pieslice -outline {}
49 -style pieslice -outline {}
51 -style chord -outline {}
53 -style chord -outline {}
59 set prevOutline [lindex [.t.c itemconf current -outline] 4]
64 .t.c itemconf current -outline $outline2
67 .t.c bind arc <Any-Leave> {.t.c itemconf current -fill $prevFill -outline $prevOutline}
83 -outline black]