Clock skew is only if timestamp is > now

[ypp-sc-tools.db-live.git] / yarrg / commod-update-receiver

diff --git a/yarrg/commod-update-receiver b/yarrg/commod-update-receiver
index cbd98f84b2e15c64b64bd4e4d1674d856f95b1b4..0ae5ba8a8560a025b452c596ec9bad9be9458c06 100755 (executable)
--- a/yarrg/commod-update-receiver
+++ b/yarrg/commod-update-receiver
@@ -62,7 +62,8 @@ sub must_param ($$) {
 my %o;
 
 if (param('get_source')) {
-    header('application/octet-stream');
+    # There's another copy of this in dictionary-update-receiver.  Sorry.
+    print header('application/octet-stream') or die $!;
     source_tarball('..', sub { print $_[0] or die $!; });
     exit 0;
 }
@@ -128,7 +129,7 @@ foreach my $islands (values %$arches) {
 fail("unknown island") unless $island_found;
 
 $o{'timestamp'}= must_param('timestamp', "^([1-9]\\d{1,20})\$");
-fail("clock skew") if $o{'timestamp'} >= $now;
+fail("clock skew") if $o{'timestamp'} > $now;
 
 my $indatafh= upload('data');
 defined $indatafh or fail("data is not a file");