diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-18 01:37:16 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 21:30:34 +0100 |
commit | 29fc7d34d33a8756db7d6c73b6d1c4b3937e6732 (patch) | |
tree | 6bc1f1584074edaa13045d43d1f856a0992147fc /lib | |
parent | 166457060329c863146fb92894612dba5a5e5177 (diff) | |
download | drakx-kbd-mouse-x11-29fc7d34d33a8756db7d6c73b6d1c4b3937e6732.tar drakx-kbd-mouse-x11-29fc7d34d33a8756db7d6c73b6d1c4b3937e6732.tar.gz drakx-kbd-mouse-x11-29fc7d34d33a8756db7d6c73b6d1c4b3937e6732.tar.bz2 drakx-kbd-mouse-x11-29fc7d34d33a8756db7d6c73b6d1c4b3937e6732.tar.xz drakx-kbd-mouse-x11-29fc7d34d33a8756db7d6c73b6d1c4b3937e6732.zip |
perlish ->allocation => ->get_allocation
Diffstat (limited to 'lib')
-rw-r--r-- | lib/mouse.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/mouse.pm b/lib/mouse.pm index d5f4867..d816055 100644 --- a/lib/mouse.pm +++ b/lib/mouse.pm @@ -586,8 +586,8 @@ sub test_mouse { my $layout = $darea->create_pango_layout($t); my ($w) = $layout->get_pixel_size; $darea->get_window->draw_layout($darea->style->black_gc, - ($darea->allocation->width-$w)/2, - ($darea->allocation->height-$height)/2 + $y, + ($darea->get_allocation->width-$w)/2, + ($darea->get_allocation->height-$height)/2 + $y, $layout); }; my $draw_pixbuf = sub { @@ -595,7 +595,7 @@ sub test_mouse { $w = $p->get_width; $h = $p->get_height; $p->render_to_drawable($darea->get_window, $darea->style->bg_gc('normal'), 0, 0, - ($darea->allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, + ($darea->get_allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, $w, $h, 'none', 0, 0); }; my $draw_by_name = sub { @@ -629,7 +629,7 @@ sub test_mouse { } else { my ($x, $y) = @{$offsets{mouse_2b_middle}}; $darea->get_window->draw_arc($darea->style->black_gc, - 1, ($darea->allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, 20, 25, + 1, ($darea->get_allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, 20, 25, 0, 360 * 64); } } elsif ($mouse->{nbuttons} > 3) { |