diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Xconfig/test.pm | 2 | ||||
| -rw-r--r-- | lib/mouse.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lib/Xconfig/test.pm b/lib/Xconfig/test.pm index 2bdd7cc..c2f16cd 100644 --- a/lib/Xconfig/test.pm +++ b/lib/Xconfig/test.pm @@ -114,7 +114,7 @@ sub test { my $root = gtkroot(); my $gc = Gtk3::Gdk::GC->new($root); my $pixbuf = Gtk3::Gdk::Pixbuf->new_from_file("$::prefix/usr/share/mga/xfdrake/xfdrake-test-card.png"); - my ($w, $h) = ($pixbuf->get_width, $pixbuf->get_allocated_height); + my ($w, $h) = ($pixbuf->get_allocated_width, $pixbuf->get_allocated_height); my $pixmap = Gtk3::Gdk::Pixmap->new($root, $w, $h, $root->get_depth); $pixbuf->render_to_drawable($pixmap, $gc, 0, 0, 0, 0, $w, $h, 'none', 0, 0); $root->set_back_pixmap($pixmap, 0); diff --git a/lib/mouse.pm b/lib/mouse.pm index 23310ea..51de483 100644 --- a/lib/mouse.pm +++ b/lib/mouse.pm @@ -578,7 +578,7 @@ sub test_mouse { up => 'arrow_up', down => 'arrow_down'); my %images = map { $_ => ugtk3::gtkcreate_pixbuf("$image_files{$_}.png") } keys %image_files; - my $width = $images{mouse}->get_width; + my $width = $images{mouse}->get_allocated_width; my $height = round_up($images{mouse}->get_allocated_height, 6); my $draw_text = sub { @@ -592,7 +592,7 @@ sub test_mouse { }; my $draw_pixbuf = sub { my ($p, $x, $y, $w, $h) = @_; - $w = $p->get_width; + $w = $p->get_allocated_width; $h = $p->get_allocated_height; $p->render_to_drawable($darea->get_window, $darea->get_style->bg_gc('normal'), 0, 0, ($darea->get_allocation->width-$width)/2 + $x, ($darea->get_allocation->height-$height)/2 + $y, |