diff options
| author | Norbert Preining <preining@logic.at> | 2020-04-15 03:02:45 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2020-04-15 03:02:45 +0000 |
| commit | a557b3d3743ec1828da8a1016fc7a6e7982930c6 (patch) | |
| tree | a1fc79d01c3b442f50dd3db458d4a0c96a207559 /Master/tlpkg | |
| parent | 62c5441a418cc4320fd320112395e5721fadf01d (diff) | |
sort depends etc when writing out TLPOBJ
git-svn-id: svn://tug.org/texlive/trunk@54748 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 2a2ccf49064..b35421bfb9a 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -290,17 +290,17 @@ sub writeout { 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 @@ sub writeout_simple { 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"; } } |