summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/mygtk2.pm18
2 files changed, 20 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 148f6d77f..45367c0cb 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- factorize WebKit code with mcc
+
Version 11.54.2 - 26 September 2008
- bootloader-config:
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 9e4c870c8..fa024a57d 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -527,6 +527,24 @@ sub _gtk__TextView {
$w;
}
+sub _gtk__WebKit_View {
+ my ($w, $opts, $_class, $action) = @_;
+ if (!$w) {
+ $w = Gtk2::WebKit::WebView->new;
+ }
+
+ # disable contextual menu:
+ if (delete $opts->{no_popup_menu}) {
+ $w->signal_connect('populate-popup' => sub {
+ my (undef, $menu) = @_;
+ $menu->destroy if $menu;
+ 1;
+ });
+ }
+
+ $w;
+}
+
sub _gtk__ComboBox {
my ($w, $opts, $_class, $action) = @_;