From 270feeb0273d0f1b70cbdc592473deea00d92bd6 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Sun, 1 Mar 2009 16:32:06 +0100 Subject: Make the main page show correctly again. --- cljssss-g.clj | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/cljssss-g.clj b/cljssss-g.clj index 1f0b3e6..fb55c85 100644 --- a/cljssss-g.clj +++ b/cljssss-g.clj @@ -161,12 +161,14 @@ (lynxy-showfeed (session :id) (Integer/parseInt (params :feed))))) (GET "/" (with-session (show-subscriptions (session :id) - (Integer/parseInt (params :feed)) + (and (params :feed) + (Integer/parseInt (params :feed))) nil))) (GET "/entries/*" (with-session (show-subscriptions (session :id) - (Integer/parseInt (params :feed)) - 5))) + (and (params :feed) + (Integer/parseInt (params :feed))) + 5))) ;FIXME (GET "/layout.css" (serve-file "layout.css")) (ANY "*" -- cgit v1.2.3