switch from deprecated OptionMenu into new ComboBox widget

1 files changed, 3 insertions, 3 deletions

diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm
index 096ce8e8b..aecf7e0c8 100755
--- a/perl-install/standalone/drakperm
+++ b/perl-install/standalone/drakperm
@@ -51,7 +51,7 @@ my $index = 0;
 load_perms();
 
 #- widgets settings
-my $combo_perm = new Gtk2::OptionMenu;
+my $combo_perm = Gtk2::ComboBox->new_text;
 $combo_perm->set_popdown_strings(sort(values %perm_l10n));
 
 sub add_callback() {
@@ -271,11 +271,11 @@ sub row_setting_dialog {
     my $alrd_exsts = defined $iter;
     $file->set_text($model->get($iter, 1)) if $iter;
 
-    my $users  = Gtk2::OptionMenu->new;
+    my $users  = Gtk2::ComboBox->new_text;
     $users->set_popdown_strings(&get_user_or_group('users'));
     $users->entry->set_text($model->get($iter, 2)) if $iter;
      
-    my $groups = Gtk2::OptionMenu->new;
+    my $groups = Gtk2::ComboBox->new_text;
     $groups->set_popdown_strings(&get_user_or_group);
     $groups->entry->set_text($model->get($iter, 3)) if $iter;