diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-11-08 01:33:29 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-11-08 01:33:45 +0100 |
commit | 3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b (patch) | |
tree | 34f23966760efb621e8239015a7e50a908bf4588 /perl-install/mygtk3.pm | |
parent | cce10687916e7da62e9d4df27169e7934845ed6f (diff) | |
download | drakx-3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b.tar drakx-3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b.tar.gz drakx-3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b.tar.bz2 drakx-3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b.tar.xz drakx-3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b.zip |
adapt to WebKit2 for disabling context menu
eg: in mcc
Diffstat (limited to 'perl-install/mygtk3.pm')
-rw-r--r-- | perl-install/mygtk3.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm index 0d8151047..176610882 100644 --- a/perl-install/mygtk3.pm +++ b/perl-install/mygtk3.pm @@ -622,9 +622,9 @@ sub _gtk__WebKit_WebView { # disable contextual menu: if (delete $opts->{no_popup_menu}) { - $w->signal_connect('populate-popup' => sub { + $w->signal_connect('context-menu' => sub { my (undef, $menu) = @_; - $menu->destroy if $menu; + $menu->remove_all if $menu; 1; }); } |