                     ))
                 
                 (if (package? package)
-                    (for [product products]
+                    (for [products-per-description products-per-descriptions]
                         [: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))]
+                            (for [product (second products-per-description)]
+                                [:div {:class "label label-primary" :style "margin-right:3px"} product]) 
+                            (render-description (first products-per-description))]
                     )
                 )
                 (if (and (package? package) products-without-descriptions)

        (for [product products :when (get package-descriptions (first product))]
            (first product))))

(defn process
    [package new-description]
    (if (and (not-empty-parameter? package) (not-empty-parameter? new-description))
        (store-ccs-description package new-description))
    (let [ccs-description               (read-ccs-description package)
          package-descriptions          (read-package-descriptions products/products package)
          products-without-descriptions (get-products-without-descriptions products/products package-descriptions)]
        (-> (http-response/response (html-renderer products/products package package-descriptions ccs-description products-without-descriptions))
            (http-response/content-type "text/html"))))

(defn perform-normal-processing

    (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
