retabled.internal — edu.byu.odh/retabled2 4

_table clj/s

(_table controls entries table-id)

Generate a table from entries according to headers and getter-fns in controls

a-control-label clj/s

(a-control-label {:keys [content screen page? set-current-screen]})

activate-listeners clj/s

(activate-listeners controls table-id)

add-unique-key clj/s

(add-unique-key items)

atom? clj/s

(atom? a)

ducktype an atom as something dereferable

check-for-duplicates clj/s

(check-for-duplicates table-id)

curate-entries clj/s

(curate-entries {:as args :keys [paging-controls entries table-id]})

DATA clj/s

default-paging clj/s

(default-paging table-id)

Set up a local atom and define paging functions with reference to it

dissoc-data! clj/s

(dissoc-data! k)

exceptions clj/s

generate-rows clj/s

(generate-rows {:as args :keys [controls entries table-id]})

Generate all the rows of the table from entries, according to controls

generate-table-id clj/s

(generate-table-id table-id)

generate-theads clj/s

(generate-theads {:as args :keys [controls paging-controls table-id]})

generate the table headers

PAGING clj/s

paging clj/s

(paging paging-controls entries)

Limit view of entries to a given screen. If paging-controls is falsy, do not filter.

render clj/s

(render table-id controls entries)

render-header-fields clj/s

(render-header-fields {:as args :keys [controls table-id]})

render-screen-controls clj/s

(render-screen-controls
  {:as paging-controls
   :keys [get-current-screen get-amount set-amount set-current-screen
          set-final-screen get-final-screen r-content rr-content f-content
          ff-content left-bar-content right-bar-content num-columns
          entries-option align show-total-pages?]
   :or {num-columns 100}}
  table-scroll-bar
  table-id)

Render the controls to edit this screen for results

style-cell clj/s

(style-cell {:as args :keys [arg-map c controls table-id]})

creates logic for all of the cell styling

TABLE-NAME-COUNT clj/s

update-atoms! clj/s

(update-atoms! controls entries table-id)

update-data! clj/s

(update-data! table-id entries k)

update-default-entries-per-page! clj/s

(update-default-entries-per-page! controls table-id)

update-paging-info! clj/s

(update-paging-info! table-id)