diff options
author | Karl Berry <karl@freefriends.org> | 2008-11-25 15:05:06 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-11-25 15:05:06 +0000 |
commit | f603d9c51d164c6835a63afce9cd00bfefdbe934 (patch) | |
tree | ec0f5cb95dd748371657575a27530f6fc69ed988 | |
parent | 9669b443cf65ccf44c8f9b344d130829b48e9b9d (diff) |
doc
git-svn-id: svn://tug.org/texlive/trunk@11422 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/tlpkg/bin/tl-fix-container-infos | 11 | ||||
-rwxr-xr-x | Master/tlpkg/bin/tl-update-tlnet | 4 |
2 files changed, 5 insertions, 10 deletions
diff --git a/Master/tlpkg/bin/tl-fix-container-infos b/Master/tlpkg/bin/tl-fix-container-infos index 1c7dc8a2147..2f627976713 100755 --- a/Master/tlpkg/bin/tl-fix-container-infos +++ b/Master/tlpkg/bin/tl-fix-container-infos @@ -3,7 +3,7 @@ # This file is licensed under the GNU General Public License version 2 # or any later version. # -# Updates/fixes the sizes and md5sums of all containers in the tlpdb +# Updates/fixes the sizes and md5sums of all containers in a tlpdb. BEGIN { $vc_id = '$Id$'; @@ -22,17 +22,13 @@ use Pod::Usage; use File::Path; our ($mydir, $vc_id); -my $opt_all = 0; my $opt_location = "."; my $opt_nosetup = 0; my $opt_version = 0; my $opt_help = 0; -my $opt_dry = 0; TeXLive::TLUtils::process_logging_options(); GetOptions( - "all|a" => \$opt_all, - "dry-run" => \$opt_dry, "location=s" => \$opt_location, "no-setup" => \$opt_nosetup, "version" => \$opt_version, @@ -97,7 +93,6 @@ sub main $tlpdb->add_tlpobj($obj); } $tlpdb->save; - #$tlpdb->writeout; system("lzma --force -k -z $opt_location/tlpkg/texlive.tlpdb"); return 0; @@ -134,7 +129,7 @@ __END__ =head1 NAME -tl-fix-container-infos - updates/adds size and md5 infos for the containers +tl-fix-container-infos - updates/adds size and md5 info for the containers =head1 SYNOPSIS @@ -172,7 +167,7 @@ pseudo-package C<00texlive.config>. See L<TeXLive::TLPDB>. =head1 DESCRIPTION This program adds (or updates) {,src,doc}container{size,md5} entries for -all packages found in the location given by --location. +all packages found in the location given by C<--location> (default C<.>). =head1 AUTHORS AND COPYRIGHT diff --git a/Master/tlpkg/bin/tl-update-tlnet b/Master/tlpkg/bin/tl-update-tlnet index da8533e6167..36f8190d9ff 100755 --- a/Master/tlpkg/bin/tl-update-tlnet +++ b/Master/tlpkg/bin/tl-update-tlnet @@ -145,8 +145,8 @@ if test -z "$unexpected_output"; then if $chicken; then echo "$0: Chicken mode, not updating anything." else - echo "$0: Test install ok, comparing containers." - time /home/karl/bin/cmpcont >/tmp/cmpcont 2>&1 || true # just a test + echo "$0: Test install ok, comparing containers." # just a test + (cd archive && time /home/karl/bin/cmpcont) >/tmp/cmpcont 2>&1 || true echo "$0: Updating $tlweb from $tltry." rm -rf $tlweb |