| … | … | ||
|---|---|---|---|
| 116 | } | 116 | } |
| 117 | 117 | ||
| 118 | sub _size_allocate { | 118 | sub _size_allocate { |
| 119 | my ($self, $x, $y, $w, $h) = @_; | 119 | my ($self, $x, $y, $w, $h) = @_; |
| 120 | 120 | ||
| 121 | $self->{x} = int $x; | 121 | $self->{x} = $x; |
| 122 | $self->{y} = int $y; | 122 | $self->{y} = $y; |
| 123 | 123 | ||
| 124 | return unless $self->{w} != $w || $self->{h} != $h; | 124 | return unless $self->{w} != $w || $self->{h} != $h; |
| 125 | 125 | ||
| 126 | $self->{w} = int $w; | 126 | $self->{w} = $w; |
| 127 | $self->{h} = int $h; | 127 | $self->{h} = $h; |
| 128 | 128 | ||
| 129 | 1 | 129 | 1 |
| 130 | } | 130 | } |
| 131 | 131 | ||
| 132 | sub size_allocate { | 132 | sub size_allocate { |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |