… | |
… | |
283 | # |
283 | # |
284 | # $label->show; |
284 | # $label->show; |
285 | # $label->update; |
285 | # $label->update; |
286 | # |
286 | # |
287 | # $CFClient::UI::ROOT->on_post_alloc ("$self$label" => sub { |
287 | # $CFClient::UI::ROOT->on_post_alloc ("$self$label" => sub { |
288 | # $label->move ( |
288 | # $label->move_abs ( |
289 | # ($::WIDTH - $label->{w}) * 0.5, |
289 | # ($::WIDTH - $label->{w}) * 0.5, |
290 | # ($::HEIGHT - $label->{h}) * 0.5, |
290 | # ($::HEIGHT - $label->{h}) * 0.5, |
291 | # ); |
291 | # ); |
292 | # }); |
292 | # }); |
293 | # |
293 | # |
… | |
… | |
462 | |
462 | |
463 | sub size_allocate { |
463 | sub size_allocate { |
464 | my ($self, $w, $h) = @_; |
464 | my ($self, $w, $h) = @_; |
465 | |
465 | |
466 | $self->SUPER::size_allocate ($w, $h); |
466 | $self->SUPER::size_allocate ($w, $h); |
467 | $self->move (($::WIDTH - $w) * 0.5, ($::HEIGHT - $h) * 0.6, 10); |
467 | $self->move_abs (($::WIDTH - $w) * 0.5, ($::HEIGHT - $h) * 0.6, 10); |
468 | } |
468 | } |
469 | |
469 | |
470 | sub show { |
470 | sub show { |
471 | my ($self) = @_; |
471 | my ($self) = @_; |
472 | |
472 | |