diff options
-rw-r--r-- | Master/tlpkg/dev/tlmgrgui2.pl | 33 |
1 files changed, 18 insertions, 15 deletions
diff --git a/Master/tlpkg/dev/tlmgrgui2.pl b/Master/tlpkg/dev/tlmgrgui2.pl index 78f553230fc..cadbd198e4a 100644 --- a/Master/tlpkg/dev/tlmgrgui2.pl +++ b/Master/tlpkg/dev/tlmgrgui2.pl @@ -317,11 +317,12 @@ $back_f1->pack(@x_xy); ######### SHOULD GO INTO A SEPARTE FILE ######################## # This needs to come first as we call update_grid rather early -my $list_frame = $back_f1->Labelframe(-text => "Packages"); +#my $list_frame = $back_f1->Labelframe(-text => "Packages"); +my $list_frame = $back_f1->Frame; my $g = $list_frame->Scrolled('HList', -scrollbars => "se", -bd => 0, -command => \&show_extended_info, # does not work, double click! -columns => 7, -header => 1, - -borderwidth => 0, #-padx => 0, -pady => 0, + -borderwidth => 1, #-padx => 0, -pady => 0, -separator => "/", -selectmode => "none"); @@ -643,8 +644,17 @@ $bot_frame->pack(@x_x, @p_ii); my $actions_frame = $bot_frame->Frame; $actions_frame->pack(); -my $with_sel_frame = $actions_frame->Labelframe(-text => __("with selected")); -$with_sel_frame->pack(@left, @p_ii); +#my $with_all_frame = $actions_frame->Labelframe(-text => __("with all")); +my $with_all_frame = $actions_frame->Frame; +$with_all_frame->pack(@left, -padx => '5m'); +$with_all_frame->Button(-text => __('Update all installed'), + -state => $::action_button_state, + -command => sub { update_all_packages(); } + )->pack(@a_c,@left,@p_ii); + +#my $with_sel_frame = $actions_frame->Labelframe(-text => __("with selected")); +my $with_sel_frame = $actions_frame->Frame; +$with_sel_frame->pack(@left, -padx => '5m'); # @@ -661,14 +671,14 @@ my $action_apply_filter = 1; # -variable => \$action_apply_filter, -value => 0)->pack(@left, @p_ii); # -$with_sel_frame->Button(-text => __('Install'), - -state => $::action_button_state, - -command => sub { install_selected_packages(); } - )->pack(@left, @p_ii); $with_sel_frame->Button(-text => __('Update'), -state => $::action_button_state, -command => sub { update_selected_packages(); } )->pack(@left, @p_ii); +$with_sel_frame->Button(-text => __('Install'), + -state => $::action_button_state, + -command => sub { install_selected_packages(); } + )->pack(@left, @p_ii); $with_sel_frame->Button(-text => __('Remove'), -state => $::action_button_state, -command => sub { remove_selected_packages(); } @@ -678,13 +688,6 @@ $with_sel_frame->Button(-text => __('Backup'), -command => sub { backup_selected_packages(); } )->pack(@left, @p_ii); -my $with_all_frame = $actions_frame->Labelframe(-text => __("with all")); -$with_all_frame->pack(@left, @p_ii); -$with_all_frame->Button(-text => __('Update all'), - -state => $::action_button_state, - -command => sub { update_all_packages(); } - )->pack(@a_c,@left,@p_ii); - ######################## ARCH ########################### my @archsavail; |