From: Ian Jackson Date: Sat, 25 Jul 2009 13:28:58 +0000 (+0100) Subject: metadata as tsv text header means we don't care about = in values X-Git-Tag: 3.0~40 X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.main.git;a=commitdiff_plain;h=b971a4a2c96ff4dac86857e7fc7f06cc11ff9da4 metadata as tsv text header means we don't care about = in values --- diff --git a/pctb/commod-update-receiver b/pctb/commod-update-receiver index 532bf31..4b52251 100755 --- a/pctb/commod-update-receiver +++ b/pctb/commod-update-receiver @@ -102,9 +102,6 @@ $o{'timestamp'}= must_param('timestamp', "^([1-9]\\d{1,20})\$"); my $now= time; defined $now or die $!; fail("clock skew") if $o{'timestamp'} >= $now; -die if $o{'ocean'} =~ m/\=/; -die if $o{'island'} =~ m/\=/; - my $indatafh= upload('data'); defined $indatafh or fail("data is not a file"); my $datafile= must_param('data',"^(deduped\\.tsv\\.gz)\$");