adding styling to vendors page.

This commit is contained in:
Bryce Covert
2020-08-03 22:16:01 -07:00
parent 6742d58580
commit c67daaf676
4 changed files with 162 additions and 119 deletions

View File

@@ -204,9 +204,9 @@
(r/children (r/current-component))))))
(defn virtual-paginate [start xs ]
(take 100 (drop start xs)))
(take 100 (drop (or start 0) xs)))
(defn virtual-paginate-controls [start xs]
{:start start :end (min (+ start 100)
(count xs))
{:start (or start 0) :end (min (+ (or start 0) 100)
(count xs))
:total (count xs)})