hara.group — zcaudate/hara.group 2.8.7

add-item clj

(add-item {:keys [constructor key] :as group} data)

adds an item to the group (-> (add-item people {:name :chris}) (list-items)) => [:andy :bob :chris]

append-items clj

(append-items {:keys [constructor key items] :as group} data)

appends a set of data to the group (-> (append-items people [{:name :dave} {:name :erin}]) (list-items)) => [:andy :bob :dave :erin]

defgroup clj/s macro

(defgroup name)

(defgroup name m)

creates a group of items (defgroup people {:tag :people :constructor map->Person :items [{:name :andy} {:name :bob}]}) => (comp group? deref)

defitem clj/s macro

(defitem group data)

adds an item to the group (-> (defitem people {:name :chris}) deref list-items) => [:andy :bob :chris]

find-item clj

(find-item {:keys [items] :as group} tag)

finds an item based on the given key (find-item people :andy) => {:name :andy}

group clj

(group m)

creates a group from a map (group {:tag :hello}) => #(-> % :tag (= :hello))

group? clj

(group? x)

checks to see if an element is a group (group? people) => true

install-items clj

(install-items group file)

reads a set of data from a resource and loads it into the group (-> (install-items people (java.io.StringReader. "[{:name :dave} {:name :erin}]")) (list-items)) => [:andy :bob :dave :erin]

list-items clj

(list-items {:keys [items] :as group})

returns a list of keys to items in the group

(list-items people) => [:andy :bob]

remove-item clj

(remove-item group tag)

removes items based on the key (-> (remove-item people :chris) (list-items)) => [:andy :bob]