diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2012-08-01 18:37:02 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 21:28:34 +0100 |
| commit | abf078590ff4692d5ea40f277feac76687c25b04 (patch) | |
| tree | f212c215eae1cce5f9e57d21e0290d3064b7cd77 /perl-install | |
| parent | 64b9097f5cdb64ac0018bd4390b6da4b4246cb01 (diff) | |
| download | drakx-abf078590ff4692d5ea40f277feac76687c25b04.tar drakx-abf078590ff4692d5ea40f277feac76687c25b04.tar.gz drakx-abf078590ff4692d5ea40f277feac76687c25b04.tar.bz2 drakx-abf078590ff4692d5ea40f277feac76687c25b04.tar.xz drakx-abf078590ff4692d5ea40f277feac76687c25b04.zip | |
Gtk3::ComboBox->new_text => Gtk3::ComboBoxText->new
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 2 | ||||
| -rw-r--r-- | perl-install/interactive/gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/mygtk3.pm | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/drakbug | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 86b06f72e..e5d744e55 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -517,7 +517,7 @@ sub main { my $hdchoicelabel = Gtk3::Label->new(N("Here is the content of your disk drive ")); - my $combobox = Gtk3::ComboBox->new_text; + my $combobox = Gtk3::ComboBoxText->new; foreach (@kinds) { my $info = $_->{val}{info} || $_->{val}{device}; $info =~ s|^(?:.*/)?(.{24}).*|$1|; diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index c1b196f8f..03c0ea2c1 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -518,7 +518,7 @@ sub create_widget { if (!$e->{separator}) { if ($e->{not_edit}) { - $real_w = $w = Gtk3::ComboBox->new_text; + $real_w = $w = Gtk3::ComboBoxText->new; # FIXME: the following causes Gtk-CRITICAL but not solvable at realize time: first($w->child->get_cell_renderers)->set_property('ellipsize', 'end') if !$e->{do_not_ellipsize}; $w->set_wrap_width($e->{gtk}{wrap_width}) if exists $e->{gtk}{wrap_width}; diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm index 59349c41e..455a83de1 100644 --- a/perl-install/mygtk3.pm +++ b/perl-install/mygtk3.pm @@ -605,7 +605,7 @@ sub _gtk__ComboBox { my ($w, $opts, $_class, $action) = @_; if (!$w) { - $w = Gtk3::ComboBox->new_text; + $w = Gtk3::ComboBoxText->new; $w->{format} = delete $opts->{format} if exists $opts->{format}; } diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug index fe8866df4..965c44196 100755 --- a/perl-install/standalone/drakbug +++ b/perl-install/standalone/drakbug @@ -96,7 +96,7 @@ my $bugzilla_url = 'http://bugs.mageia.org/enter_bug.cgi'; my $wizard_name = "Bugzilla"; $table = create_packtable({ col_spacings => 5, row_spacings => 10 }, - [ gtknew('Label_Left', text => N("Select %s Tool:", N("Mageia"))), $comb_app = Gtk3::ComboBox->new_text, $comb_app->set_wrap_width(3) ], + [ gtknew('Label_Left', text => N("Select %s Tool:", N("Mageia"))), $comb_app = Gtk3::ComboBoxText->new, $comb_app->set_wrap_width(3) ], [ gtknew('Label_Left', text => N("or Application Name\n(or Full Path):")), gtkpack_(Gtk3::HBox->new(0, 5), 1, $com_app = gtkset_editable(Gtk3::Entry->new, 1), |