diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakperm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 5941485dc..e3d4f4d75 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -217,8 +217,6 @@ sub row_setting_dialog { my $ok = Gtk2::Button->new_from_stock('gtk-ok'); my $cancel = Gtk2::Button->new_from_stock('gtk-cancel'); my $browse = new Gtk2::Button(N("browse")); - my $users = new Gtk2::Combo; - my $groups = new Gtk2::Combo; my $file = new Gtk2::Entry; my $usr_hbox = new Gtk2::HBox(0,5); my $usr_vbox = new Gtk2::VBox(0,5); @@ -270,13 +268,13 @@ sub row_setting_dialog { $file->set_text($treeModel->get($iter, 0)) if $iter; + my $users = Gtk2::OptionMenu->new; $users->set_popdown_strings(&get_user_or_group('users')); $users->entry->set_text($treeModel->get($iter, 1)) if $iter; - $users->entry->set_editable(0); + my $groups = Gtk2::OptionMenu->new; $groups->set_popdown_strings(&get_user_or_group); $groups->entry->set_text($treeModel->get($iter, 2)) if $iter; - $groups->entry->set_editable(0); if ($iter && $treeModel->get($iter, 1) eq 'current') { $usr_check->set_active(1); |