Lines Matching refs:widths
63 $self-> {widths} = [];
78 for ( @{$self-> {widths}}) { $w += $_ + $s * DefGapX; }
79 $self-> {arrows} = (( $w > $size[0]) and ( scalar( @{$self-> {widths}}) > 1));
88 my $ww = $self-> {widths};
99 $i = scalar @{$self-> {widths}} - 1
100 if $i >= scalar @{$self-> {widths}};
104 $self-> {lastTab} = scalar @{$self-> {widths}} - 1;
125 $self-> {widths} = [@w];
133 $self-> {arrows}, $self-> {widths}, $self-> {firstTab}, $self-> {lastTab}
287 $self-> {widths}, $self-> {topMost}
409 my $ww = $self-> {widths};
455 $$poly[0] + ( $$poly[6] - $$poly[0] - $self-> {widths}-> [$i]) / 2 + $s * DefGapX * 2,
460 $tx[0] + $self-> {widths}-> [$i] - $s * DefGapX * 4 + 1, $tx[1] + $canvas-> font-> height + 1)
485 return $_[0]-> {widths}-> [$_[1]];
503 my $ww = $self-> {widths};
563 for ( $i = $ft; $i < scalar @{$self-> {widths}}; $i++) {
564 $w += $s * DefGapX + $self-> {widths}-> [$i];
570 $w += $s * DefGapX + $self-> {widths}-> [$i];
632 splice( @{$self->{widths}}, $at, 0, $iw);
648 splice( @{$self->{widths}}, $at, 1 );