diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-18 01:37:44 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 21:30:34 +0100 |
| commit | b758380650c166aaccc98cfd5e739c18bb2228fc (patch) | |
| tree | e567232720ed88c6d29bbc1730555ace9a6b2149 /lib | |
| parent | d919750716592a3fa931e9bdffff601668f3a863 (diff) | |
| download | drakx-kbd-mouse-x11-b758380650c166aaccc98cfd5e739c18bb2228fc.tar drakx-kbd-mouse-x11-b758380650c166aaccc98cfd5e739c18bb2228fc.tar.gz drakx-kbd-mouse-x11-b758380650c166aaccc98cfd5e739c18bb2228fc.tar.bz2 drakx-kbd-mouse-x11-b758380650c166aaccc98cfd5e739c18bb2228fc.tar.xz drakx-kbd-mouse-x11-b758380650c166aaccc98cfd5e739c18bb2228fc.zip | |
perlish ->allocation => ->get_allocation
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/mouse.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/mouse.pm b/lib/mouse.pm index 774d090..0c76659 100644 --- a/lib/mouse.pm +++ b/lib/mouse.pm @@ -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->get_allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, + ($darea->get_allocation->width-$width)/2 + $x, ($darea->get_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->get_allocation->width-$width)/2 + $x, ($darea->allocation->height-$height)/2 + $y, 20, 25, + 1, ($darea->get_allocation->width-$width)/2 + $x, ($darea->get_allocation->height-$height)/2 + $y, 20, 25, 0, 360 * 64); } } elsif ($mouse->{nbuttons} > 3) { |