anchor.diff:                           (site-name)
                            (getf message :title))
             :description (getf message :body)
  -          :link (restas:genurl-with-host 'view-topic
  -                                         :topic-id topic-id)
  +          :link (restas:gen-full-url 'view-topic
  +                                     :topic-id topic-id)
             :messages (make-rss-items (storage-topic-news *storage* topic-id *rss-item-count*)))))
                                          
   
  
positive.code:   (let ((title (format nil "~A: Форумы" (site-name))))
      (list :title title
            :description title
            :link (restas:genurl-with-host 'list-forums)
            :messages (make-rss-items (storage-all-news *storage* *rss-item-count*)))))
                          
  (restas:define-route forum-rss ("rss/:(forum-id).rss"
  
negative.code:                        (first (storage-forum-info *storage* forum-id)))))
      (list :title title
            :description title
            :link (restas:gen-full-url 'list-topics
                                       :forum-id forum-id)
            :messages (make-rss-items (storage-forum-news *storage* forum-id *rss-item-count*)))))
  
  (restas:define-route topic-rss ("rss/threads/:(topic-id).rss"
  