From 0a32df7bf5b30b5b8a25c38ce9456755eeef9a2b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 21 Sep 2013 21:52:27 +0000 Subject: reverse current/new display; more pfb exceptions git-svn-id: svn://tug.org/texlive/trunk@31721 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/libexec/place | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Master/tlpkg/libexec/place') diff --git a/Master/tlpkg/libexec/place b/Master/tlpkg/libexec/place index 49a17a69bd0..d037d412bf8 100755 --- a/Master/tlpkg/libexec/place +++ b/Master/tlpkg/libexec/place @@ -330,7 +330,7 @@ sub show_tlp_diffs { if (keys %Old == 0) { print "place: $package not present in $M/$InfraLocation/$DatabaseName"; } else { - print "new vs. present $package (present is indented)\n"; + print "current vs. new $package (new is indented)\n"; my @oldfiles = keys %Old; unlink ("$tmpfile.old"); foreach (sort @oldfiles) { @@ -341,8 +341,8 @@ sub show_tlp_diffs { foreach (sort @newfiles) { `echo "$_" >>$tmpfile.new`; } - print `comm -3 $tmpfile.new $tmpfile.old`; - my @difffiles = `comm -12 $tmpfile.new $tmpfile.old`; + print `comm -3 $tmpfile.old $tmpfile.new`; + my @difffiles = `comm -12 $tmpfile.old $tmpfile.new`; chomp (@difffiles); my $sum = 0; my $identical = 0; -- cgit v1.2.3