Quietly load sf namespace when loading sf objects

r-spatial · Aug 8, 2023 · 0ec3ec4 · 0ec3ec4
1 parent 9a7f212
commit 0ec3ec4
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/R/sf.R b/R/sf.R
@@ -293,9 +293,14 @@ st_sf = function(..., agr = NA_agr_, row.names,
 	st_agr(df) = agr
 	if (! missing(crs))
 		st_crs(df) = crs
+
+	attr(df, ".sf_namespace") <- .sf_namespace
+
 	df
 }
 
+.sf_namespace <- function() NULL
+
 #' @name sf
 #' @param x object of class \code{sf}
 #' @param i record selection, see \link{[.data.frame}