Skip to content

Commit

Permalink
Merge pull request #1199 from TIP-Global-Health/1125-latest-ddev-elm-…
Browse files Browse the repository at this point in the history
…install

Update elm packages
  • Loading branch information
anvmn authored Jun 13, 2024
2 parents d633d98 + 2def87a commit b03c320
Show file tree
Hide file tree
Showing 3 changed files with 34 additions and 28 deletions.
46 changes: 26 additions & 20 deletions client/elm.json
Original file line number Diff line number Diff line change
Expand Up @@ -9,34 +9,34 @@
"direct": {
"Gizra/elm-all-set": "1.0.1",
"Gizra/elm-debouncer": "2.0.0",
"NoRedInk/elm-json-decode-pipeline": "1.0.0",
"NoRedInk/elm-json-decode-pipeline": "1.0.1",
"avh4/elm-color": "1.0.0",
"ccapndave/elm-update-extra": "4.0.0",
"elm/browser": "1.0.1",
"elm/core": "1.0.0",
"elm/browser": "1.0.2",
"elm/core": "1.0.5",
"elm/html": "1.0.0",
"elm/http": "1.0.0",
"elm/json": "1.1.3",
"elm/regex": "1.0.0",
"elm/svg": "1.0.1",
"elm/time": "1.0.0",
"elm/url": "1.0.0",
"elm-community/json-extra": "4.0.0",
"elm-community/list-extra": "8.1.0",
"elm-community/json-extra": "4.3.0",
"elm-community/list-extra": "8.7.0",
"elm-community/maybe-extra": "5.3.0",
"elm-community/string-extra": "4.0.1",
"elm-community/typed-svg": "5.1.0",
"elm-explorations/test": "1.2.1",
"elm-community/typed-svg": "7.0.0",
"elm-explorations/test": "1.2.2",
"etaque/elm-form": "4.0.0",
"folkertdev/one-true-path-experiment": "4.0.3",
"gampleman/elm-visualization": "2.0.1",
"hecrj/html-parser": "2.3.4",
"folkertdev/one-true-path-experiment": "6.0.0",
"gampleman/elm-visualization": "2.4.1",
"hecrj/html-parser": "2.4.0",
"ianmackenzie/elm-float-extra": "1.1.0",
"justinmimbs/date": "3.2.1",
"justinmimbs/time-extra": "1.1.0",
"justinmimbs/date": "4.1.0",
"justinmimbs/time-extra": "1.2.0",
"krisajenkins/remotedata": "5.0.0",
"lukewestby/elm-http-builder": "6.0.0",
"myrho/elm-round": "1.0.4",
"myrho/elm-round": "1.0.5",
"stoeffel/editable": "2.0.1",
"truqu/elm-base64": "2.0.4",
"truqu/elm-md5": "1.1.0",
Expand All @@ -45,16 +45,22 @@
"indirect": {
"elm/parser": "1.1.0",
"elm/random": "1.0.0",
"elm/virtual-dom": "1.0.2",
"elm/virtual-dom": "1.0.3",
"elmcraft/core-extra": "2.0.0",
"folkertdev/elm-deque": "3.0.1",
"folkertdev/svg-path-lowlevel": "3.0.0",
"ianmackenzie/elm-geometry": "1.2.1",
"ianmackenzie/elm-interval": "1.0.1",
"ianmackenzie/elm-triangular-mesh": "1.0.2",
"folkertdev/svg-path-lowlevel": "4.0.1",
"gampleman/elm-rosetree": "1.1.0",
"ianmackenzie/elm-1d-parameter": "1.0.1",
"ianmackenzie/elm-geometry": "3.11.0",
"ianmackenzie/elm-interval": "3.1.0",
"ianmackenzie/elm-triangular-mesh": "1.1.0",
"ianmackenzie/elm-units": "2.10.0",
"ianmackenzie/elm-units-interval": "3.2.0",
"ianmackenzie/elm-units-prefixed": "2.8.0",
"pzp1997/assoc-list": "1.0.0",
"rtfeldman/elm-hex": "1.0.0",
"rtfeldman/elm-iso8601-date-strings": "1.1.3",
"ryannhg/date-format": "2.3.0",
"rtfeldman/elm-iso8601-date-strings": "1.1.4",
"ryan-haskell/date-format": "1.0.0",
"zwilias/elm-utf-tools": "2.0.1"
}
},
Expand Down
10 changes: 5 additions & 5 deletions client/package-lock.json

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

6 changes: 3 additions & 3 deletions client/src/elm/Pages/Dashboard/View.elm
Original file line number Diff line number Diff line change
Expand Up @@ -84,7 +84,7 @@ import Translate exposing (Language, TranslationId, translate, translateText, tr
import TypedSvg exposing (g, svg)
import TypedSvg.Attributes as Explicit exposing (fill, transform, viewBox)
import TypedSvg.Core exposing (Svg)
import TypedSvg.Types exposing (Fill(..), Transform(..))
import TypedSvg.Types exposing (Paint(..), Transform(..))
import Utils.Html exposing (spinner, viewModal)
import Utils.NominalDate exposing (sortByDateDesc)

Expand Down Expand Up @@ -2302,7 +2302,7 @@ annular colors signs pieData =

makeSlice index datum =
Path.element (Shape.arc { datum | innerRadius = radius - 60 })
[ fill <| Fill <| getColor index ]
[ fill <| Paint <| getColor index ]
in
g [ transform [ Translate (3 * radius + 20) radius ] ]
[ g [] <| List.indexedMap makeSlice pieData
Expand Down Expand Up @@ -2337,7 +2337,7 @@ viewPieChartLegend language translateFunc colorFunc signs =
in
div [ class "legend-item" ]
[ svg [ Svg.Attributes.width "12", Svg.Attributes.height "12", viewBox 0 0 100 100 ]
[ Svg.circle [ cx "50", cy "50", r "40", fill <| Fill <| colorFunc sign ] []
[ Svg.circle [ cx "50", cy "50", r "40", fill <| Paint <| colorFunc sign ] []
]
, span [] [ text <| label ++ " (" ++ normalizedPercentage ++ "%)" ]
]
Expand Down

0 comments on commit b03c320

Please sign in to comment.