| … | |
… | |
| 1113 | |
1113 | |
| 1114 | sub update { |
1114 | sub update { |
| 1115 | my ($self) = @_; |
1115 | my ($self) = @_; |
| 1116 | |
1116 | |
| 1117 | $self->SUPER::update; |
1117 | $self->SUPER::update; |
| 1118 | |
|
|
| 1119 | $self->update_slider; |
1118 | $self->update_slider; |
| 1120 | } |
1119 | } |
| 1121 | |
1120 | |
| 1122 | sub invoke_size_allocate { |
1121 | sub invoke_size_allocate { |
| 1123 | my ($self, $w, $h) = @_; |
1122 | my ($self, $w, $h) = @_; |
| 1124 | |
1123 | |
| 1125 | $self->update_slider; |
1124 | $self->update_slider; |
| 1126 | |
|
|
| 1127 | $self->SUPER::invoke_size_allocate ($w, $h) |
1125 | $self->SUPER::invoke_size_allocate ($w, $h) |
| 1128 | } |
1126 | } |
| 1129 | |
1127 | |
| 1130 | ############################################################################# |
1128 | ############################################################################# |
| 1131 | |
1129 | |
