                   (set-key-value :mutations (.-data dt))
                   (set-key-value :total-pages (get-total-rec-no (.-pagesCount dt)))
                   (set-key-value :page-location  [render-mutations (get-value! :mutations)])))]
+    (set-key-value :is-searched-results false)
     (http-get (str "http://localhost:9000/mutations?pageIndex="(dec (get-value! :current-page))"&pageSize=10") onres)))
 
 (defroute mutations-list "/mutations" []

                  (set-key-value :mutations (.-data dt))
                  (set-key-value :total-pages (get-total-rec-no (.-pagesCount dt)))
                  (set-key-value :page-location  [render-mutations (get-value! :mutations)])))]
    (http-get (str "http://localhost:9000/mutations?pageIndex="(dec (get-value! :current-page))"&pageSize=10") onres)))



(def pager-elem (r/adapt-react-class (aget js/ReactBootstrap "Pagination")))

(defn set-pager-data [sel-page-no]
  (let [mt (.-value (.getElementById js/document "mutationnumber"))
        v (.-value (.getElementById js/document "dt"))
        onres (fn[json]
                (let [dt (getdata json)]
                  (set-key-value :mutations (.-data dt))
                  (set-key-value :total-pages (get-total-rec-no (.-pagesCount dt)))
                  (set-key-value :page-location
                                 [render-mutations (get-value! :mutations)])))]
    (http-get (get-index-url (get-value! :is-searched-results)
                             (dec (get-value! :current-page))
                             mt v)
              onres)))

(defn pager [value total-rec]
  [pager-elem {:bsSize "large"
