summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorManuel Pégourié-Gonnard <mpg@elzevir.fr>2008-06-09 15:23:49 +0000
committerManuel Pégourié-Gonnard <mpg@elzevir.fr>2008-06-09 15:23:49 +0000
commitaca25408a71aa50650162ae580179897e1326164 (patch)
tree94983b1d101f8d1005a52c36ddc42453494ab2a9 /Master
parent50f52150516bb5f7e20bb1c586122ca09bd28f13 (diff)
rm useless size test in files_differ()
git-svn-id: svn://tug.org/texlive/trunk@8617 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/tlpkg/bin/tlpkg-ctan-check18
1 files changed, 3 insertions, 15 deletions
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index fcf13e10ebe..348e7797f21 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -233,12 +233,10 @@ sub main
exit 0;
}
- # xx read FILES.last7days, determine CTAN changes, map to TL packages
- # xx alternatively, check all tlp's, etc. ...
if ($ARGV[0] eq "--check") {
$OPT{"verbose"} = 0;
- # xx but for now, just check the few packages we have worked with.
+ # for now, just check the few packages we have worked with.
@ARGV = @WorkingTLP;
}
@@ -346,18 +344,8 @@ sub files_differ
{
my ($tl_file,$ctan_file) = @_;
#warn "comparing $tl_file $ctan_file\n";
-
- my $different = 0;
- if (-s $tl_file != -s $ctan_file) {
- # sometimes what's checked into CTAN vs. TL differs in the eol
- # conventions. Don't worry about that.
- if (system ("diff -q --strip-trailing-cr $tl_file $ctan_file >/dev/null")
- != 0) {
- $different = 1;
- }
- }
-
- return $different;
+ return (system (
+ "diff -q --strip-trailing-cr $tl_file $ctan_file >/dev/null") != 0);
}
# vim: set ts=8 sw=2 expandtab: