diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-22 16:24:42 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 23:53:09 +0100 |
| commit | 32dfc90e18b52dc5bc3928a46c5e946158d7aee1 (patch) | |
| tree | 753d8a0617e7f316bcfabda8ef7b9224c364faa3 /perl-install/ugtk3.pm | |
| parent | 3e5eec0fb8d4099a5d0f9a4a16c0d26851ce6fd5 (diff) | |
| download | drakx-32dfc90e18b52dc5bc3928a46c5e946158d7aee1.tar drakx-32dfc90e18b52dc5bc3928a46c5e946158d7aee1.tar.gz drakx-32dfc90e18b52dc5bc3928a46c5e946158d7aee1.tar.bz2 drakx-32dfc90e18b52dc5bc3928a46c5e946158d7aee1.tar.xz drakx-32dfc90e18b52dc5bc3928a46c5e946158d7aee1.zip | |
Pango->PANGO_WEIGHT_BOLD is not available through introspection
Diffstat (limited to 'perl-install/ugtk3.pm')
| -rw-r--r-- | perl-install/ugtk3.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm index 59d8fae49..e136d6701 100644 --- a/perl-install/ugtk3.pm +++ b/perl-install/ugtk3.pm @@ -311,7 +311,7 @@ sub markup_to_TextView_format { foreach (@$l) { my ($_txt, $attrs) = @$_; if ($attrs) { - $attrs->{weight} eq 'bold' and $attrs->{weight} = Pango->PANGO_WEIGHT_BOLD; + $attrs->{weight} eq 'bold' and $attrs->{weight} = 'bold'; $attrs->{size} eq 'larger' and do { $attrs->{scale} = 1.4399999999999; # PANGO_SCALE_X_LARGE: equivalent to Label's size => 'larger' delete $attrs->{size}; |