diff options
| -rw-r--r-- | lib/mouse.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/mouse.pm b/lib/mouse.pm index 51de483..f48b06a 100644 --- a/lib/mouse.pm +++ b/lib/mouse.pm @@ -487,7 +487,7 @@ sub test_mouse_install { ugtk3->import(qw(:wrappers :create)); my $w = ugtk3->new(N("Testing the mouse"), disallow_big_help => 1); my $darea = Gtk3::DrawingArea->new; - $darea->set_events([ 'button_press_mask', 'button_release_mask' ]); #$darea must be unrealized. + $darea->set_events(${ Gtk3::Gdk::EventMask->new([ 'button_press_mask', 'button_release_mask' ]) }); #$darea must be unrealized. gtkadd($w->{window}, gtkpack(my $vbox_grab = Gtk3::VBox->new(0, 0), $darea, |