X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fcommod-email-processor;h=de68fbad98250c24cb43199cb1316e7dc4f79a0f;hb=847492a8eebac261fb3ffa5e97391b486a73d336;hp=bf42c0d65ef4b8344f29963de36080b35f664535;hpb=7d2fec305c9bdc622a41a343332331b25472fa20;p=ypp-sc-tools.db-live.git

diff --git a/yarrg/commod-email-processor b/yarrg/commod-email-processor
index bf42c0d..de68fba 100755
--- a/yarrg/commod-email-processor
+++ b/yarrg/commod-email-processor
@@ -117,7 +117,9 @@ sub main () {
     db_setocean($md{'ocean'});
     my $dbfn= db_filename();
     (stat $dbfn) or die "stat database $dbfn failed $!\n";
+    db_writer();
     db_connect();
+    db_onconflict(sub { print STDERR "temporary failure: @_\n"; exit 75; });
 
     my ($islandid) = $dbh->selectrow_array(
               "SELECT islands.islandid
@@ -206,7 +208,7 @@ sub main () {
 
     pipethrough_run_finish($pt, 'gunzip <$deduped_tsv.gz');
 
-    print "\n";
+#    print "\n";
     $dbh->commit();
 
     # select * from ((buy natural join commods) natural join stalls) natural join islands;