X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.main.git;a=blobdiff_plain;f=pctb%2Fdictionary-update-receiver;h=cd1638e22a476e905d2ebecd7975169181fb1358;hp=0ce85934d1948d23a02b47ef321cbcbce387a5f8;hb=a0caaae8722bc8f567b1849c1ba19e13297ce548;hpb=3d80a86a8c77e29a26e70aa810ebb2dea607208e diff --git a/pctb/dictionary-update-receiver b/pctb/dictionary-update-receiver index 0ce8593..cd1638e 100755 --- a/pctb/dictionary-update-receiver +++ b/pctb/dictionary-update-receiver @@ -12,7 +12,7 @@ use strict (qw(vars)); use POSIX; -$CGI::POST_MAX= 65536; +$CGI::POST_MAX= 1024*1024; $CGI::DISABLE_UPLOADS= 1; use CGI qw/:standard -private_tempfiles/; @@ -155,7 +155,7 @@ sub pipeval ($@) { my $dict= param('dict'); my $entry_in= param('entry'); -defined $entry_in or die; +defined $entry_in or die Dump()." ?"; my $ocean= param('ocean'); my $pirate= param('pirate'); @@ -268,7 +268,7 @@ L->flush or die $!; if (eval { - open S, "|sendmail -odb -oee -oi -t" or die $!; + open S, "|/usr/lib/sendmail -odb -oee -oi -t" or die $!; print S $email or die $!; $!=0; $?=0; close S or die $!; $? and die $?; @@ -279,6 +279,7 @@ if (eval { print L "$ll stored\n" or die $!; } else { print L "$ll ERROR! $@\n" or die $!; + exit 1; } close L or die $!;