summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2020-03-27 22:17:02 +0000
committerKarl Berry <karl@freefriends.org>2020-03-27 22:17:02 +0000
commit56767f4c282bd0d0df4b8423d74158db23c729ee (patch)
tree3c0d466716801920e5ba30f5f378299e7cbf9dd3
parent0132baca5957e80c5eb5e3eeeec462ede4c2d7df (diff)
$Data::Dumper::Trailingcomma to avoid spurious diffs
git-svn-id: svn://tug.org/texlive/trunk@54592 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/tlpkg/bin/tl-update-ctan-mirrors4
1 files changed, 3 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tl-update-ctan-mirrors b/Master/tlpkg/bin/tl-update-ctan-mirrors
index 8d59a406e6c..a3bf03e4f65 100755
--- a/Master/tlpkg/bin/tl-update-ctan-mirrors
+++ b/Master/tlpkg/bin/tl-update-ctan-mirrors
@@ -32,7 +32,9 @@ sub main {
my %good_urls = read_mstate($ARGV[1]);
my %ctan_sites = read_readme_mirror($ARGV[0], \%good_urls);
$Data::Dumper::Indent = 1;
- $Data::Dumper::Sortkeys = 1; # stable output
+ $Data::Dumper::Sortkeys = 1; # stable output
+ $Data::Dumper::Purity = 1; # make recursive structures safe
+ $Data::Dumper::Trailingcomma = 1; # avoid spurious diffs
print Data::Dumper->Dump([\%ctan_sites], [qw(mirrors)]);
return 0;