 (defn gallery-grid [state]
   (let [badges (:applications @state)
         tags (:tags @state)]
-    [:div 
+    [:div
      [:h3 (str-cat tags)]
-     (into [:div {:class "row"
+     (into [:div {:class "row wrap-grid"
                   :id    "grid"}]
            (for [element-data badges]
              (badge-grid-element element-data state)))]))

          [:h1.uppercase-header name]
          [:div.badge-stats
           (bh/issuer-label-image-link issuer_content_name issuer_content_url "" issuer_contact issuer_image)
           [:div 
            description]
           (if-not (blank? criteria_url)
             [:div {:class "badge-info"}

  (if tags
    (s/split tags #",")))

(defn modal-content [data state]
  (let [{:keys [image_file name info issuer_content_name tags  issuer_content_name issuer_content_url issuer_contact issuer_image description criteria_url]} data
        tags (tag-parser tags)
        country (:country-selected @state)]
