adapt new sf-0.9 way to retrieve proj4string. #271

r-spatial · Mar 20, 2020 · 813e4bb · 813e4bb · edzer · Mar 20, 2020
1 parent 7abf070
commit 813e4bb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mapviewControls.R b/R/mapviewControls.R
@@ -193,7 +193,7 @@ getProjection <- function(x) {
   if (inherits(x, c("Raster", "Spatial"))) {
     prj <- raster::projection(x)
   } else {
-    prj <- sf::st_crs(x)[["proj4string"]]
+    prj <- sf::st_crs(x)$"proj4string"
   }
 
   return(prj)