fill :: Color -> PathOptions -> PathOptions
fill color = set fillColor (Just color)
fill :: Color -> PathOptions -> PathOptions
fill color = set fillColor (Just color)
fill color = set fillColor (Just color)