diff options
-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; }); } |