diff options
Diffstat (limited to 'Master/tlpkg/libexec')
-rwxr-xr-x | Master/tlpkg/libexec/place | 6 |
1 files changed, 3 insertions, 3 deletions
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; |