             [arcis.ajax :as ajax]
             [arcis.utils :as u]))
 
-(def page-size 20)
-(def index-size 10)
+(def page-size 30)
+(def index-size 15)
 
 (defn keywordize-host-list
   "Convert a list of hosts maps and converts keys to keywords and

;;      Filename: hosts_utils.cljs
;; Creation Date: Saturday, 01 August 2015 04:41 PM AEST
;; Last Modified: Sunday, 18 October 2015 12:59 PM AEDT
;;        Author: Tim Cross <theophilusx AT gmail.com>
;;   Description:
;;

    (state/set-value-in! [:hosts :host-list] host-hash)
    (state/set-value-in! [:hosts :host-index] host-idx)))

(defn get-host-list
  "Retrieve a list of hosts from the server"
  []
  (if (state/is-authenticated?)
    (ajax/get-it "get-host-list" "/hosts/list" #'process-host-list)
    (u/report-unauthenticated "get-host-lists")))

(defn get-display-action
  "Get the current display state for a host record"
  [host-key]
  (state/value-in [(state/this-page) :host-list host-key :display-action]))

(defn set-display-action
  "Set the display state for a host record"
  [host-id action]
  (state/set-value-in! [(state/this-page) :host-list
                        (u/digit-keyword host-id) :display-action] action))

