@@ -11,7 +11,7 @@ open System
11
11
open TestUtils.HtmlCodegen
12
12
13
13
let basemapChart =
14
- Chart.PointGeo([], UseDefaults = false ) // deliberately empty chart to show the base map only
14
+ Chart.PointGeo( locations = [], UseDefaults = false ) // deliberately empty chart to show the base map only
15
15
|> Chart.withMarginSize( 0 , 0 , 0 , 0 )
16
16
17
17
let moreFeaturesBasemapChart =
@@ -29,7 +29,7 @@ let moreFeaturesBasemapChart =
29
29
ShowRivers= true ,
30
30
RiverColor= Color.fromString " Blue"
31
31
)
32
- Chart.PointGeo([], UseDefaults = false )
32
+ Chart.PointGeo( locations = [], UseDefaults = false )
33
33
|> Chart.withGeo myGeo
34
34
|> Chart.withMarginSize( 0 , 0 , 0 , 0 )
35
35
@@ -41,7 +41,7 @@ let cultureMapChart =
41
41
ShowCountries= true ,
42
42
CountryColor= Color.fromString " RebeccaPurple"
43
43
)
44
- Chart.PointGeo([], UseDefaults = false )
44
+ Chart.PointGeo( locations = [], UseDefaults = false )
45
45
|> Chart.withGeo countryGeo
46
46
|> Chart.withMarginSize( 0 , 0 , 0 , 0 )
47
47
@@ -92,7 +92,7 @@ let pointGeoChart =
92
92
Chart.PointGeo(
93
93
lon,
94
94
lat,
95
- Labels = cityNames,
95
+ MultiText = cityNames,
96
96
TextPosition= StyleParam.TextPosition.TopCenter,
97
97
UseDefaults = false
98
98
)
@@ -136,7 +136,7 @@ let flightsMapChart =
136
136
Chart.LineGeo(
137
137
[ startCoords; endCoords],
138
138
Opacity = opacityVals.[ i],
139
- Color = Color.fromString " red" ,
139
+ MarkerColor = Color.fromString " red" ,
140
140
UseDefaults = false
141
141
)
142
142
)
0 commit comments