           package             (get params "package")
           new-description     (get params "new-description")]
           (process package new-description)))
+
+(defn render-all-descriptions
+    [request]
+    (let [descriptions (read-all-descriptions)]
+        (println descriptions)
+        (-> (http-response/response (html-renderer-descriptions descriptions))
+            (http-response/content-type "text/html"))))
 
 (defn return-file
     [file-name content-type]

                    ))
                
                (if (package? package)
                    (for [product products]
                        [:div
                            [:div {:class "label label-primary" :style "margin-right:3px"} (first product)] 
                            [:div {:class "alert alert-success"} (get package-descriptions (first product))]]
     ;                       (render-description (first products-per-description))]
                    )
                )
                (if (and (package? package) products-without-descriptions)

    (and package (not (empty? package))))

(defn html-renderer
    [products package package-descriptions ccs-description products-per-descriptions products-without-descriptions]
    (page/xhtml
        (render-html-header package)
        [:body
