diff options
-rwxr-xr-x | Master/tlpkg/bin/tl-update-ctan-mirrors | 4 |
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; |