From b097c128b037750e3f3afa3b7d14e6dfb44b317f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 13 Dec 2013 17:55:37 +0100
Subject: workaround a gtk+3 issue resulting in blacked embbeded tools
 (mga#11969)

it only happens with some locales (eg: pl/uk)
---
 perl-install/NEWS      | 3 +++
 perl-install/mygtk3.pm | 1 +
 2 files changed, 4 insertions(+)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index d48f6df77..b05535bdf 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,6 @@
+- workaround a gtk+3 issue resulting in blacked embbeded tools with some
+  locales (eg: pl/uk) (mga#11969)
+
 Version 16.13 - 10 December 2013
 
 - localedrake:
diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm
index a4f790d89..97e64290a 100644
--- a/perl-install/mygtk3.pm
+++ b/perl-install/mygtk3.pm
@@ -896,6 +896,7 @@ sub _gtk_any_Window {
 	if ($class eq 'Window') {
 	    $w = "Gtk3::$class"->new(delete $opts->{type} || 'toplevel');
 	} elsif ($class eq 'Plug') {
+	    delete $opts->{title};
 	    $opts->{socket_id} or internal_error("cannot create a Plug without a socket_id");
 	    $w = "Gtk3::$class"->new(delete $opts->{socket_id});
 	} elsif ($class eq 'FileChooserDialog') {
-- 
cgit v1.2.1