show first schemes, then collections, then packages in the list of packages

in the GUI


git-svn-id: svn://tug.org/texlive/trunk@14071 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 5 insertions, 2 deletions

diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
index 89835da02e8..f06a35c393d 100755
--- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
@@ -560,6 +560,7 @@ sub create_update_list {
 sub setup_list {
   my $addi = shift;
   my @ret;
+  my @colls;
   my @other;
   foreach my $p (@_) {
     if ($p !~ m;\.;) {
@@ -572,14 +573,16 @@ sub setup_list {
         }
       }
       $pushstr .= "$p";
-      if ($p =~ m;^collection-;) {
+      if ($p =~ m;^scheme-;) {
         push @ret, $pushstr;
+      } elsif ($p =~ m;^collection-;) {
+        push @colls, $pushstr;
       } else {
         push @other, $pushstr;
       }
     }
   }
-  push @ret, @other;
+  push @ret, @colls, @other;
   return(@ret);
 }