diff options
| author | Karl Berry <karl@freefriends.org> | 2013-04-04 17:31:21 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2013-04-04 17:31:21 +0000 |
| commit | fd4545fe5a780ce3e1fbf1b78d668729de1bff7d (patch) | |
| tree | 4e09fb0200704914885bc52dd69629fd280433eb /Master/tlpkg/bin/tl-compare-tlpdbs | |
| parent | 7ae4f3a4bad94230ffba68bceb27b269b8fa04c4 (diff) | |
exclude mptopdf files from context update; do not warn about negative patterns not matching when updating from CTAN
git-svn-id: svn://tug.org/texlive/trunk@29640 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tl-compare-tlpdbs')
| -rwxr-xr-x | Master/tlpkg/bin/tl-compare-tlpdbs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/tl-compare-tlpdbs b/Master/tlpkg/bin/tl-compare-tlpdbs index 10a50b321bf..1a8c1a5afe1 100755 --- a/Master/tlpkg/bin/tl-compare-tlpdbs +++ b/Master/tlpkg/bin/tl-compare-tlpdbs @@ -1,5 +1,5 @@ #!/usr/bin/env perl -# Copyright 2008, 2009, 2010, 2011 Norbert Preining +# Copyright 2008-2013 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. # @@ -29,9 +29,9 @@ my $opt_help = 0; TeXLive::TLUtils::process_logging_options(); GetOptions( + "all" => sub { @add_ignored_packs = () }, "version" => \$opt_version, "help|?" => \$opt_help, - "all" => sub { @add_ignored_packs = () }, ) or pod2usage(1); pod2usage("-exitstatus" => 0, "-verbose" => 2) if $opt_help; @@ -40,8 +40,7 @@ if ($opt_version) { print "$vc_id\n"; exit 0; } exit (&main()); -sub main -{ +sub main { chomp(my $Master = `cd $mydir/../.. && pwd`); # get additional list of disabled packages |