diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-01 17:03:22 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-01 17:03:22 +0000 |
| commit | 1819241f7b56ec5264ffed2328130739732e6f57 (patch) | |
| tree | 499941f67871c6fc2674b53ad4025b722a87f987 /perl-install | |
| parent | 2ab23097cea89a91af71550b5000f5a3031a6d6b (diff) | |
| download | drakx-backup-do-not-use-1819241f7b56ec5264ffed2328130739732e6f57.tar drakx-backup-do-not-use-1819241f7b56ec5264ffed2328130739732e6f57.tar.gz drakx-backup-do-not-use-1819241f7b56ec5264ffed2328130739732e6f57.tar.bz2 drakx-backup-do-not-use-1819241f7b56ec5264ffed2328130739732e6f57.tar.xz drakx-backup-do-not-use-1819241f7b56ec5264ffed2328130739732e6f57.zip | |
(create_dialog) add use_markup in order to hint the usage of pango attributes
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 03fd0f1c6..e98985f08 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -365,7 +365,8 @@ sub create_dialog { $dialog->set_border_width(10); $dialog->set_position('center-on-parent'); # center-on-parent doesn't work $dialog->set_size_request(-1, 400); - $dialog->vbox->pack_start(create_scrolled_window(my $text = Gtk2::Label->new($label), [ 'never', 'automatic' ]), 1, 1, 0); + my $text = $o_options->{use_markup} ? gtkset_markup(Gtk2::Label->new(), $label) : Gtk2::Label->new($label); + $dialog->vbox->pack_start(create_scrolled_window($text, [ 'never', 'automatic' ]), 1, 1, 0); $text->set_line_wrap(1); my $button = Gtk2::Button->new(N("OK")); |