diff options
author | Karl Berry <karl@freefriends.org> | 2008-04-30 21:53:59 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-04-30 21:53:59 +0000 |
commit | 2c40efc9729acb3d036cf29a4adc7966be996957 (patch) | |
tree | 521faf2aef32d44d30573ec898c857bc37938625 | |
parent | a834b8647f369a99764a8de2b9dc07bbcd38df7a (diff) |
more convenient output
git-svn-id: svn://tug.org/texlive/trunk@7755 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/tlpkg/bin/tlprm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm index 340298d283a..d267b19bcf4 100755 --- a/Master/tlpkg/bin/tlprm +++ b/Master/tlpkg/bin/tlprm @@ -1,6 +1,6 @@ #!/usr/bin/env perl # $Id$ -# Copyright 2007 Karl Berry. +# Copyright 2007, 2008 TeX Users Group. # This file is licensed under the GNU General Public License version 2 # or any later version. # @@ -46,7 +46,6 @@ sub main { my $failure_count = 0; - # xx should default in TLPDB. chomp (my $Master = `cd $mydir/../.. && pwd`); my $tlpdb = TeXLive::TLPDB->new (root => $Master); @@ -85,8 +84,8 @@ sub main `printf "@lines" >>$commit_file`; print "first edit collections:\n", @lines; - print "then svn remove `cat $rm_file`\n"; - print "then svn commit -m'rm $f' `cat $commit_file`\n"; + print "then\nsvn remove `cat $rm_file`\n"; + print "then\nsvn commit -m'rm $f' `cat $commit_file`\n"; if (1) { # maybe only if debugging? print "\nremovals ($rm_file):\n"; |