Skip to content

Commit

Permalink
Whitespace cleanup
Browse files Browse the repository at this point in the history
  • Loading branch information
kimo-k committed Jan 23, 2024
1 parent 6566fa1 commit 521d10e
Showing 1 changed file with 18 additions and 20 deletions.
38 changes: 18 additions & 20 deletions src/re_demo/v_table_demo.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -13,7 +13,7 @@
(def non-breaking-space (gstring/unescapeEntities " "))

(def headers-background-color "#60A0D8") ;; used for row and column headers
(def headers-color "white") ;; text colour
(def headers-color "white") ;; text colour

(def table-outside-border-style "1px solid #E8ECF0)")

Expand Down Expand Up @@ -291,7 +291,7 @@
;; ========== Column Header Renderer functions ==========

(defn timeline-activities
"Given a `resolution` of `:days` `:weeks` or `:months`,
"Given a `resolution` of `:days` `:weeks` or `:months`,
returns a sequence of maps for activities covering the range from `date-start` to `date-end`.
Each map contains `:start-date` & `:num-days`"
[date-start date-end resolution]
Expand All @@ -300,7 +300,7 @@
(map #(hash-map :start-date % :num-days 1)
(time.periodic/periodic-seq date-start date-end (time.core/period resolution 1)))
:weeks
(let [extended-end (if-not (= :weeks resolution) ;; TODO: Given the `case` context, test will always be true
(let [extended-end (if-not (= :weeks resolution) ;; TODO: Given the `case` context, test will always be true
date-end ; no need to extend
(let [mod-week (-> (time.core/interval date-start date-end)
(time.core/in-days)
Expand Down Expand Up @@ -637,27 +637,25 @@
[:li [source-reference "for this v-table" "src/re_demo/v_table_demo.cljs"]]]]]])

;; MT Notes
;;
;; - for a given MediaType there's a set of attributes for each activity
;;
;; - for a given MediaType there's a set of attributes for each activity
;; - a row is a "container" for multiple activities
;; - and a row captures a set of attrinutes which all the activities within it have in common.
;; - Rows are organised hierarchily
;; - parent rows capture attrinutes shared by child-rows.
;; - and a row captures a set of attrinutes which all the activities within it have in common.
;; - Rows are organised hierarchily
;; - parent rows capture attrinutes shared by child-rows.
;; - the row header (for a given media type) has a number of attributes
;; - the user may want to default some of those attributes - eg. 15 sec
;; - or they may want to enter them
;; - Groups: so user can create a " group header" (eg "Metro - 15 se")"
;; - for all the rows under that, the user has to enter one or two
;; - some row-groups capture derived attributes, like "Metro". This are not strictly speaking attrinutes. They are derivative of real attributes, but they constrain the set of possible values.
;;
;; - for all the rows under that, the user has to enter one or two
;; - some row-groups capture derived attributes, like "Metro". This are not strictly speaking attrinutes. They are derivative of real attributes, but they constrain the set of possible values.
;;
;; BUT there are different MediaType rows, I guess TV rows is different to tv POST cost rows.
;;
;; multiple row-group
;; multiple Row
;;
;; multiple row-group
;; multiple Row
;; multiple attrinutes
;;
;; Later, when importing a
;;
;;


;;
;; Later, when importing a
;;
;;

0 comments on commit 521d10e

Please sign in to comment.