summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk3.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-11-08 01:33:29 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-11-08 01:33:45 +0100
commit3fc3e324bfb4fec2407fc5acc1982c67ed4dbb3b (patch)
tree34f23966760efb621e8239015a7e50a908bf4588 /perl-install/mygtk3.pm
parentcce10687916e7da62e9d4df27169e7934845ed6f (diff)
downloaddrakx-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.pm4
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;
});
}