mention --upload at top of README

[ypp-sc-tools.main.git] / pctb / dictionary-update-receiver

diff --git a/pctb/dictionary-update-receiver b/pctb/dictionary-update-receiver
index 0ce85934d1948d23a02b47ef321cbcbce387a5f8..13131f3330272f96f7ea74e5fe34b621dd673f55 100755 (executable)
--- 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/;
@@ -54,7 +54,7 @@ sub parseentryin__pixmap ($) {
 
     my $whole= pipeval($ppm,
                       'ppmtopgm',
-                      'pnmnorm -bpercent 40 -wpercent 20',
+                      'pnmnorm -bpercent 10 -wpercent 5',
                       'pgmtopbm -threshold',
                       'pnminvert',
                       'pbmtoascii');
@@ -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 $!;