diff of d465e5d4373889fa751bd09d518d740536400395

d465e5d4373889fa751bd09d518d740536400395
diff --git a/src/view/admin/new-post.lisp b/src/view/admin/new-post.lisp
index 10bae35..039cc84 100644
--- a/src/view/admin/new-post.lisp
+++ b/src/view/admin/new-post.lisp
@@ -68,5 +68,5 @@
 	    (murja.posts.post-db:link-previously (post-id post) id)))
 
 	(if (post-hidden? post)
-	    (hunchentoot:redirect (easy-routes:genurl 'murja.view.blog-root:root))
-	    (hunchentoot:redirect (easy-routes:genurl 'murja.view.single-post:blog/post/id :id (post-id post))))))))
+	    (hunchentoot:redirect "/blog")
+	    (hunchentoot:redirect (format nil "/blog/post/~d" (post-id post))))))))
diff --git a/src/view/rss.lisp b/src/view/rss.lisp
index feaed3f..f19a02e 100644
--- a/src/view/rss.lisp
+++ b/src/view/rss.lisp
@@ -43,7 +43,7 @@ ORDER BY pubdate DESC" feed-id (not (not archived))))
 
     (:div
      (:a :href (str:replace-all "?archived=NIL" ""
-		(easy-routes:genurl 'rss-single-feed :feed-id feed-id :archived (not archived)))
+				(format nil "/blog/feeds/~a?archived=~a" feed-id (not archived)))
 	 (if archived
 	     "Show only unread"
 	     "Show all")))
@@ -52,7 +52,7 @@ ORDER BY pubdate DESC" feed-id (not (not archived))))
      (dolist (item items)
        (destructuring-bind (id fetched title link author pubdate) item
 	 (declare (ignore fetched link author))
-	 (:li (:a :href (easy-routes:genurl 'rss-single-item :feed-id feed-id :item-id id)  title)
+	 (:li (:a :href (format nil "/blog/feeds/~a/item/~a" feed-id id)title)
 	      (:section ("Published ~a" (lisp-fixup:fix-timestamp pubdate)))))))))
 
 
@@ -87,7 +87,7 @@ ORDER BY pubdate DESC" feed-id (not (not archived))))
 								  (when (confirm (+ "Are you sure you wish to DELETE " (@ e target dataset feedname) "?"))
 								    (delete-feed (@ e target dataset feedid)))))))))))))
 
-(defroute new-feed ("/feed/"
+(defroute new-feed ("/feed"
 		    :decorators (@db
 				 @ssr-authenticated)
 		    :method :post)
@@ -107,14 +107,14 @@ ORDER BY pubdate DESC" feed-id (not (not archived))))
        (destructuring-bind (id name url count last-modified) feed
 	 (:li.flowy-list-item
 	  (:h*
-	   (:a :href (easy-routes:genurl 'rss-single-feed :feed-id id) (format nil "~a (~d)" name count)))
+	   (:a :href (format nil "/blog/feeds/~a" id) (format nil "~a (~d)" name count)))
 	  (:div "Feed is located in " (:a :href url url))
 	  (:div ("Last updated ~a" (unless (equalp last-modified :NULL)
 				     (lisp-fixup:fix-timestamp last-modified))))
 
 	  (:button.remove-feed :data-feedid id :data-feedname name "DELETE THIS FEED")))))
 
-    (:form :method "POST" :action (easy-routes:genurl 'new-feed)
+    (:form :method "POST" :action "/feed"
 	   (:h* "Subscribe into a new feed?")
 	   (:label "Feed name: " (:input :type :text :name "feed_name"))
 	   (:label "Feed url: " (:input :type :text :name "feed_url"))