summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tl-compare-tlpdbs
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tl-compare-tlpdbs')
-rwxr-xr-xMaster/tlpkg/bin/tl-compare-tlpdbs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/bin/tl-compare-tlpdbs b/Master/tlpkg/bin/tl-compare-tlpdbs
index 2969545aca1..dd4104be181 100755
--- a/Master/tlpkg/bin/tl-compare-tlpdbs
+++ b/Master/tlpkg/bin/tl-compare-tlpdbs
@@ -127,18 +127,23 @@ sub main
}
}
+ my $ret = 0;
+
if (@revision_differ) {
+ $ret = 1;
print "packages with revision discrepancy:\n";
for my $p (@revision_differ) {
print "$p";
}
}
for my $pkg (keys %filedifferrors) {
+ $ret = 1;
print "file differences in $pkg:\n";
for my $l (@{$filedifferrors{$pkg}}) {
print " $l\n";
}
}
+ return($ret);
}