summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlprm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-01-16 00:42:27 +0000
committerKarl Berry <karl@freefriends.org>2009-01-16 00:42:27 +0000
commit7e867b8819b2a24f72fb83e5db8c12b0c83def76 (patch)
tree28e5923ae2945d4cea8ab5af97e42821fa39f33c /Master/tlpkg/bin/tlprm
parent3f18e1f365c055731f2247a79e93d0bd2bd5a62b (diff)
say to tell robinf.
git-svn-id: svn://tug.org/texlive/trunk@11890 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tlprm')
-rwxr-xr-xMaster/tlpkg/bin/tlprm8
1 files changed, 5 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm
index 05ecc02d8d3..dde4436337c 100755
--- a/Master/tlpkg/bin/tlprm
+++ b/Master/tlpkg/bin/tlprm
@@ -1,6 +1,6 @@
#!/usr/bin/env perl
# $Id$
-# Copyright 2007, 2008 TeX Users Group.
+# Copyright 2007, 2008, 2009 TeX Users Group.
# This file is licensed under the GNU General Public License version 2
# or any later version.
#
@@ -30,8 +30,7 @@ my $opt_help = 0;
TeXLive::TLUtils::process_logging_options();
GetOptions("help|?" => \$opt_help) or pod2usage(1);
-
-pod2usage(-exitstatus => 0, -verbose => 2) if $opt_help;
+pod2usage("-exitstatus" => 0, "-verbose" => 2) if $opt_help;
exit (&main ());
@@ -74,6 +73,9 @@ sub main
unlink ($commit_file);
`printf "$removals" >$commit_file`;
+ print "if license in Catalogue is still free, "
+ . 'tell Robin.Fairbairns@cl.cam.ac.uk.\n';
+
my $tsrc = "$Master/tlpkg/tlpsrc";
my @lines = `grep -l 'depend.* $f\$' $tsrc/collection-* $tsrc/scheme-*`;
print "first edit collections:\n", @lines if @lines;