texlive[54748] Master/tlpkg/TeXLive/TLPOBJ.pm: sort depends etc when

[commits+preining at tug.org]

Revision: 54748
          http://tug.org/svn/texlive?view=revision&revision=54748
Author:   preining
Date:     2020-04-15 05:02:45 +0200 (Wed, 15 Apr 2020)
Log Message:
-----------
sort depends etc when writing out TLPOBJ

Modified Paths:
--------------
    trunk/Master/tlpkg/TeXLive/TLPOBJ.pm

Modified: trunk/Master/tlpkg/TeXLive/TLPOBJ.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLPOBJ.pm	2020-04-14 23:54:08 UTC (rev 54747)
+++ trunk/Master/tlpkg/TeXLive/TLPOBJ.pm	2020-04-15 03:02:45 UTC (rev 54748)
@@ -290,17 +290,17 @@
     write $fd;  # use that multilineformat
   }
   if (defined($self->{'depends'})) {
-    foreach (@{$self->{'depends'}}) {
+    foreach (sort @{$self->{'depends'}}) {
       print $fd "depend $_\n";
     }
   }
   if (defined($self->{'executes'})) {
-    foreach (@{$self->{'executes'}}) {
+    foreach (sort @{$self->{'executes'}}) {
       print $fd "execute $_\n";
     }
   }
   if (defined($self->{'postactions'})) {
-    foreach (@{$self->{'postactions'}}) {
+    foreach (sort @{$self->{'postactions'}}) {
       print $fd "postaction $_\n";
     }
   }
@@ -381,17 +381,17 @@
   print $fd "name ", $self->name, "\n";
   print $fd "category ", $self->category, "\n";
   if (defined($self->{'depends'})) {
-    foreach (@{$self->{'depends'}}) {
+    foreach (sort @{$self->{'depends'}}) {
       print $fd "depend $_\n";
     }
   }
   if (defined($self->{'executes'})) {
-    foreach (@{$self->{'executes'}}) {
+    foreach (sort @{$self->{'executes'}}) {
       print $fd "execute $_\n";
     }
   }
   if (defined($self->{'postactions'})) {
-    foreach (@{$self->{'postactions'}}) {
+    foreach (sort @{$self->{'postactions'}}) {
       print $fd "postaction $_\n";
     }
   }