webapps.planet: wrap feed updating within a with-logging form so that errors fetch-feed don't break everything. Previously if there was an error fetching a feed, the update task would just stop

release
Slava Pestov 2010-03-23 05:07:44 -04:00
parent 0a47b9c0ae
commit 522f28d5a5
1 changed files with 5 additions and 2 deletions

View File

@ -1,4 +1,4 @@
! Copyright (C) 2008 Slava Pestov.
! Copyright (C) 2008, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel accessors sequences sorting math math.order
calendar alarms logging concurrency.combinators namespaces
@ -194,4 +194,7 @@ posting "POSTINGS"
{ planet "planet-common" } >>template ;
: start-update-task ( db -- )
'[ _ [ update-cached-postings ] with-db ] 10 minutes every drop ;
'[
"webapps.planet"
[ _ [ update-cached-postings ] with-db ] with-logging
] 10 minutes every drop ;