summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-13 09:35:12 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-13 09:35:12 +0000
commit5af2bf3c9b873b2bef4a241db7716f9c57105195 (patch)
treecda128ca586e48702830a7068308377c6869de67 /perl-install/mygtk2.pm
parent3cfe74366efbcb3250ae5f4967f814e28b46321c (diff)
downloaddrakx-5af2bf3c9b873b2bef4a241db7716f9c57105195.tar
drakx-5af2bf3c9b873b2bef4a241db7716f9c57105195.tar.gz
drakx-5af2bf3c9b873b2bef4a241db7716f9c57105195.tar.bz2
drakx-5af2bf3c9b873b2bef4a241db7716f9c57105195.tar.xz
drakx-5af2bf3c9b873b2bef4a241db7716f9c57105195.zip
(_gtk__Title1) do not render spurious "<span ...></span>" if nothing was passed
Diffstat (limited to 'perl-install/mygtk2.pm')
-rw-r--r--perl-install/mygtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index d56042139..c5987b3a0 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -388,7 +388,7 @@ sub title1_to_markup {
sub _gtk__Title1 {
my ($w, $opts) = @_;
$opts ||= {};
- $opts->{text_markup} = title1_to_markup(delete($opts->{label}));
+ $opts->{text_markup} = title1_to_markup(delete($opts->{label})) if $opts->{label};
_gtk__Label($w, $opts);
}