From 53730a28c2118bc17fa4dfbd08d995d43251e6af Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <littledan@Macintosh-24.local>
Date: Tue, 4 Dec 2007 21:19:11 -0500
Subject: [PATCH] Planet Factor RSS changes

---
 extra/webapps/planet/planet.factor | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/extra/webapps/planet/planet.factor b/extra/webapps/planet/planet.factor
index 31ef4222ba..9fdafe033b 100644
--- a/extra/webapps/planet/planet.factor
+++ b/extra/webapps/planet/planet.factor
@@ -11,7 +11,7 @@ TUPLE: posting author title date link body ;
 : fetch-feed ( pair -- feed )
     second
     dup "Fetching " diagnostic
-    dup news-get feed-entries
+    dup download-feed feed-entries
     swap "Done fetching " diagnostic ;
 
 : fetch-blogroll ( blogroll -- entries )
@@ -130,9 +130,9 @@ SYMBOL: last-update
     [ feed-entries ] map concat sort-entries ;
 
 : planet-feed ( -- feed )
-    default-blogroll get [ second news-get ] map merge-feeds 
+    default-blogroll get [ second download-feed ] map merge-feeds 
     >r "[ planet-factor ]" "http://planet.factorcode.org" r> <entry>
-    generate-atom ;
+    feed>xml ;
 
 : feed.xml planet-feed ;