      :handler (fn [data]
                 (let [{:keys [badges badge_count]} data]
                   ;(value-helper state tags)
+                  (reset! (cursor state [:params :page_count]) 1)
                   (swap! state assoc
-                         :page_count (inc (:page_count @state))
                          :badges badges
                          :badge_count badge_count)))
      :finally (fn []


(defn get-more-badges [state]
  (let [{:keys [user-id country-selected badge-name recipient-name issuer-name
                tags order full-tags tags-badge-ids value page_count]} @state
        ajax-message-atom (cursor state [:ajax-message])]
    (ajax/GET
      (path-for (str "/obpv1/gallery/badges"))
      {:params  (:params @state)

                    :page_count     @page-count-atom}
       :handler (fn [data]
                  (value-helper state (get-in data [:tags]))
                  (swap! page-count-atom inc)
                  (swap! state assoc
                         :badges (:badges data)
                         :badge_count (:badge_count data)))
       :finally (fn []
                  (ajax-stop ajax-message-atom))})))
