bug : plotMapOptions with linkDefaultCol

[Jalal Edine Zawam]

code KO

resOptions<-plotMapOptions(areaDefaultCol = "red", linkDefaultCol = "orange")


plotMap(
  myConDataEurope, 
  mlTyndp, 
  interactive = FALSE,
  colLinkVar="FLOW LIN.",
  timeId=115,
  options = resOptions
)


```


![plotmap](https://user-images.githubusercontent.com/22026724/33942278-b5e1a0b6-e015-11e7-9f5f-17532180aff6.png)

[Jalal Edine Zawam]

[Jalal Edine Zawam]

OK