From fbc6096472f65a0a7dd4180e8bb0269f263cf6ec Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 18 Nov 2013 01:59:05 +0100
Subject: workaround a gtk+3 regression (bgo#711873)

See https://bugzilla.gnome.org/show_bug.cgi?id=711873
---
 lib/mouse.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/mouse.pm')

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,
-- 
cgit v1.2.1