say to tell robinf.

git-svn-id: svn://tug.org/texlive/trunk@11890 c570f23f-e606-0410-a88d-b1316a301751

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;