summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tl-update-containers
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-06-11 19:01:28 +0000
committerNorbert Preining <preining@logic.at>2009-06-11 19:01:28 +0000
commit4668ff2135619ef67c9561b09886b591d4a1879e (patch)
tree7345da1e2f16775442017d8d00fd9835c366ee98 /Master/tlpkg/bin/tl-update-containers
parentf80859d2b991050682111ee79e8cbb12c8b330d8 (diff)
create md5 sums of texlive.tlpdb in the tlnet directories
git-svn-id: svn://tug.org/texlive/trunk@13710 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tl-update-containers')
-rwxr-xr-xMaster/tlpkg/bin/tl-update-containers7
1 files changed, 7 insertions, 0 deletions
diff --git a/Master/tlpkg/bin/tl-update-containers b/Master/tlpkg/bin/tl-update-containers
index a6d126bfea7..91208c9faeb 100755
--- a/Master/tlpkg/bin/tl-update-containers
+++ b/Master/tlpkg/bin/tl-update-containers
@@ -377,6 +377,13 @@ sub main
# do that.
$nettlpdb->save;
system("$::progs{'xz'} --force -k -z $opt_location/tlpkg/texlive.tlpdb");
+ chomp (my $olddir = `pwd`);
+ if (chdir("$opt_location/tlpkg/")) {
+ system("md5sum texlive.tlpdb > texlive.tlpdb.md5");
+ chdir($olddir);
+ } else {
+ tlwarn("Cannot chdir to $opt_location/tlpkg/ for md5 hash creation\n");
+ }
if (! @ARGV) {
# do a last check that all the containers are actually present