diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-09-06 12:51:32 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 21:28:35 +0100 |
| commit | 99b1943996623b48db883434aaa9f82a6650403a (patch) | |
| tree | 0a0535afff14887dff0e187e1777e3fcb78a0c2c /perl-install/ugtk3.pm | |
| parent | a90c75de317ece497ecd0da553c3a0666ae4fd16 (diff) | |
| download | drakx-99b1943996623b48db883434aaa9f82a6650403a.tar drakx-99b1943996623b48db883434aaa9f82a6650403a.tar.gz drakx-99b1943996623b48db883434aaa9f82a6650403a.tar.bz2 drakx-99b1943996623b48db883434aaa9f82a6650403a.tar.xz drakx-99b1943996623b48db883434aaa9f82a6650403a.zip | |
use Pango as binded by Gtk3
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 192d7a6a9..99c4ce5a8 100644 --- a/perl-install/ugtk3.pm +++ b/perl-install/ugtk3.pm @@ -310,7 +310,7 @@ sub markup_to_TextView_format { foreach (@$l) { my ($_txt, $attrs) = @$_; if ($attrs) { - $attrs->{weight} eq 'bold' and $attrs->{weight} = do { require Pango; Pango->PANGO_WEIGHT_BOLD }; + $attrs->{weight} eq 'bold' and $attrs->{weight} = Pango->PANGO_WEIGHT_BOLD; $attrs->{size} eq 'larger' and do { $attrs->{scale} = Pango->scale_x_large; # equivalent to Label's size => 'larger' delete $attrs->{size}; |