steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
extra/webapps/planet/planet.factor
View File

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