Minor planet-factor update

release
Slava Pestov 2007-10-24 02:24:26 -04:00
parent 588da9ab15
commit fc40cef6af
1 changed files with 5 additions and 2 deletions

View File

@ -1,7 +1,7 @@
USING: sequences rss arrays concurrency kernel sorting
html.elements io assocs namespaces math threads vocabs html
furnace http.server.templating calendar math.parser splitting
continuations debugger ;
continuations debugger system ;
IN: webapps.planet
TUPLE: posting author title date link body ;
@ -108,8 +108,11 @@ SYMBOL: cached-postings
{ "Slava Pestov" "http://factor-language.blogspot.com/atom.xml" "http://factor-language.blogspot.com/" }
} default-blogroll set-global
SYMBOL: last-update
: update-thread ( -- )
[ update-cached-postings ] try
millis last-update set-global
[ update-cached-postings ] in-thread
10 60 * 1000 * sleep
update-thread ;