diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakperm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 4cc1ced98..06121b7f1 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -287,7 +287,14 @@ sub row_setting_dialog { }); my %perms; $ok->signal_connect(clicked => sub { - $iter ||= $treeModel->append; # create new item when adding a new one + if (!$iter) { # create new item when adding a new one + $iter = $treeModel->append; + my $first_iter = $treeModel->get_iter_first; + if ($first_iter) { + $treeModel->move_after($iter, $first_iter); + $treeModel->swap($iter, $first_iter); + } + } $treeModel->set($iter, 1 => $file->get_text); if ($usr_check->get_active) { $treeModel->set($iter, 2 => 'current'); |