basic cleanup

[?]

Feb 7, 2021, 6:54 PM

ZHV75AEN7ZYS4LMQK3THSU7O25UIVURBR6XNKUFRN7NVPGHULWDAC

Dependencies

[2] U7YAT2ZK Add error reporting to signup form.
[3] 7TQPQW3N Begin adding parsing for project detail.
[4] QH4UB73N Format with purty.
[5] Z5KNL332 Add skeleton of project overview HTML.
[6] QAC2QJ32 Add project overview page to client.
[7] PPW6ROC5 Render project data

Change contents

replacement in client/src/Aftok/Overview.purs at line 102

[2.3810]→[2.3810:3855](∅→∅)

[ HH.text "Project Overview" ]

[2.3810]

[2.3855]

[ HH.text "Project Overview - New!" ]
replacement in client/src/Aftok/Overview.purs at line 132

[2.4795]→[2.4795:4902](∅→∅)

, colmd2 (Just "Undepreciated Period")
, colmd2 (Just "Depreciation Duration")

[2.4795]

[2.4902]

, colmd3 (Just "Undepreciated Period")
, colmd3 (Just "Depreciation Duration")
replacement in client/src/Aftok/Overview.purs at line 153

[2.5678]→[2.5678:5786](∅→∅)

, colmd2 (Just "Contributed Hours")
, colmd2 (Just "Current Revenue Share")

[2.5678]

[2.5786]

, colmd3 (Just "Contributed Hours")
, colmd3 (Just "Current Revenue Share")
replacement in client/src/Aftok/Overview.purs at line 164

[3.3059]→[3.2178:2294](∅→∅)

[ colmd2 (Just $ show (unwrap obj.undep) <> " days")
, colmd2 (Just $ show (unwrap obj.dep) <> " days")

[3.3059]

[3.2294]

[ colmd3 (Just $ show (unwrap obj.undep) <> " days")
, colmd3 (Just $ show (unwrap obj.dep) <> " days")
replacement in client/src/Aftok/Overview.purs at line 179

[2.6331]→[2.6331:6424](∅→∅)

, colmd2 (Just $ show (unwrap pud.timeDevoted))
, colmd2 (Just $ pct <> "%")

[2.6331]

[2.6424]

, colmd3 (Just $ show (unwrap pud.timeDevoted))
, colmd3 (Just $ pct <> "%")
edit in client/src/Aftok/Overview.purs at line 186

[3.3320]

[2.6533]

colmd3 :: Maybe String -> H.ComponentHTML OverviewAction Slots m
colmd3 xs = HH.div [ P.classes (ClassName <$> [ "col-md-3" ]) ] (U.fromMaybe $ HH.text <$> xs)