summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tlprm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-11-25 01:53:36 +0000
committerKarl Berry <karl@freefriends.org>2010-11-25 01:53:36 +0000
commitf7b05bcb358b433bc55986e970632eb495e4010b (patch)
treefe3e83d314108dc4d7a7fcc29cb5e07a2a45a6f0 /Master/tlpkg/bin/tlprm
parentb62fe2fb49240c8162192fa0c5178cec83cee543 (diff)
rm vita, nonfree license
git-svn-id: svn://tug.org/texlive/trunk@20557 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/bin/tlprm')
-rwxr-xr-xMaster/tlpkg/bin/tlprm9
1 files changed, 7 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm
index ce19830923b..fa134018cd8 100755
--- a/Master/tlpkg/bin/tlprm
+++ b/Master/tlpkg/bin/tlprm
@@ -79,10 +79,15 @@ sub main
print "if license in Catalogue is free, and package isn't, "
. "tell Robin.Fairbairns\@cl.cam.ac.uk.\n";
+ # show with line numbers for next-error.
my $tsrc = "$Master/tlpkg/tlpsrc";
- my @lines = `grep -l 'depend.* $f\$' $tsrc/collection-* $tsrc/scheme-*`;
+ my @lines = `grep -n 'depend.* $f\$' $tsrc/collection-* $tsrc/scheme-*`;
print "first edit collections:\n", @lines if @lines;
- `printf "@lines" >>$commit_file`;
+
+ # but just file names for commit list.
+ my @coll_files = @lines; # get
+ s/:.*// for @coll_files;
+ `printf "@coll_files" >>$commit_file`;
my $check_script = "$Master/tlpkg/bin/tlpkg-ctan-check";
@lines = `egrep '( |^)$f( |\$)' $check_script`;