pijul nest
guest › [sign in] [explore]

Reformat using ormolu.

nuttycom
Aug 30, 2022, 2:17 AM
E2YKXUK6DCHEWO4DDGNWCDSXLKFEDDFRA6T7KEA4B5N2I445PF5AC

Dependencies

  • [2] 4WBBSPHB Avoid divisions by zero & display depreciated time shares.
  • [3] SOIAMXLW Build versioned docker images.
  • [4] M4PWY5RU Preliminary work to add support for Zcash payments.
  • [5] U7YAT2ZK Add error reporting to signup form.
  • [6] CI4OPKQM Add payouts spec.
  • [7] B6HWAPDP Modularize & update to recent haskoin.
  • [8] W3PIWHDK Fix logged hours display error.
  • [9] X3ES7NUA Fine. I'll use ormolu. At least it doesn't break the code.
  • [10] DZ7G36NC Allow first-revenue cutoff for depreciation.
  • [11] 46PUXHTY Implement project invitations.
  • [12] 7HPY3QPF Fix linting errors. (yay hlint!)
  • [*] NVOCQVAS Initial failing tests.
  • [*] PBD7LZYQ Postgres & auth are beginning to function.
  • [*] LEINLS3X Update deployment documentation.

Change contents

  • edit in test/Aftok/TimeLogSpec.hs at line 25
    [3.2043]→[2.2201:2233](∅→∅)
    import qualified Data.UUID as U
  • edit in test/Aftok/TimeLogSpec.hs at line 26
    [3.82945]
    [3.83035]
    import qualified Data.UUID as U
  • replacement in test/Aftok/TimeLogSpec.hs at line 139
    [2.2489]→[2.2489:3095](∅→∅)
    raw = [
    ("b3ff64b7-6699-45f2-acee-38751325bf46", StartWork, "2021-02-09T15:52:13.434308+00"),
    ("b3ff64b7-6699-45f2-acee-38751325bf46", StopWork, "2021-02-09T16:12:32.936579+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StartWork, "2021-02-09T16:23:10.637749+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StopWork, "2021-02-09T16:27:00.082747+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StartWork, "2021-02-09T16:29:10.119337+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StopWork, "2021-02-09T18:54:26.778107+00")]
    [2.2489]
    [2.3095]
    raw =
    [ ("b3ff64b7-6699-45f2-acee-38751325bf46", StartWork, "2021-02-09T15:52:13.434308+00"),
    ("b3ff64b7-6699-45f2-acee-38751325bf46", StopWork, "2021-02-09T16:12:32.936579+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StartWork, "2021-02-09T16:23:10.637749+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StopWork, "2021-02-09T16:27:00.082747+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StartWork, "2021-02-09T16:29:10.119337+00"),
    ("d56ae5bd-8892-44c6-9a02-f6a8aca8636e", StopWork, "2021-02-09T18:54:26.778107+00")
    ]
  • replacement in test/Aftok/TimeLogSpec.hs at line 150
    [2.3278]→[2.3278:3376](∅→∅)
    <*> (f . C.toThyme <$> parseISO8601 t)
    <*> pure Nothing
    [2.3278]
    [2.3376]
    <*> (f . C.toThyme <$> parseISO8601 t)
    <*> pure Nothing
  • edit in test/Aftok/TimeLogSpec.hs at line 156
    [2.3547]→[2.3547:3549](∅→∅)
  • edit in server/Aftok/Snaplet/Projects.hs at line 38
    [3.24756]→[3.24756:24770](∅→∅)
    wsLogged,
  • edit in server/Aftok/Snaplet/Projects.hs at line 39
    [2.1652]
    [3.24770]
    wsLogged,
  • replacement in lib/Aftok/TimeLog.hs at line 203
    [2.1470]→[2.1470:1628](∅→∅)
    t & wsShare .~ (
    if totalTime == 0
    then 0
    else (C.toSeconds (t ^. wsDepreciated) / C.toSeconds totalTime)
    )
    [2.1470]
    [3.23689]
    t & wsShare
    .~ ( if totalTime == 0
    then 0
    else (C.toSeconds (t ^. wsDepreciated) / C.toSeconds totalTime)
    )
  • replacement in Makefile at line 4
    [3.9]→[3.1:68](∅→∅)
    ormolu --mode inplace $(find lib server daemon test -name '*.hs')
    [3.9]
    [3.92]
    ormolu --mode inplace $(shell find lib server daemon test -name '*.hs')