Lines Matching refs:framewidth
59 my $fwidth = $spec->{framewidth} || 1;
68 my($shape, $left, $bottom, $width, $height, $framewidth,
72 if( $framewidth ) {
75 $right - $framewidth, $top - $framewidth,
76 $left + $framewidth, $top - $framewidth,
77 $left + $framewidth, $bottom + $framewidth], 'f',
80 $right - $framewidth, $top - $framewidth,
81 $right - $framewidth, $bottom + $framewidth,
82 $left + $framewidth, $bottom + $framewidth], 'f',
85 $shape->box($left + $framewidth, $bottom + $framewidth,
86 $width - $framewidth * 2, $height - $framewidth * 2, 'f',
91 my($shape, $x, $y, $r, $framewidth, $color1, $color2, $color3,
93 if( $framewidth ) {
104 $shape->circle($x, $y, $r - $framewidth, 'f', undef,