move lwgeom dependency to Suggests:

DESCRIPTION

@@ -36,7 +36,6 @@ Imports:
     methods,
     parallel,
     classInt (>= 0.4-1),
-    lwgeom,
     rlang,
     units
 Suggests: 
@@ -60,6 +59,7 @@ Suggests:
     httr,
     jsonlite,
     knitr,
+    lwgeom,
     maps,
     mapdata,
     ncdfgeom,

NAMESPACE

@@ -133,7 +133,6 @@ S3method(st_set_bbox,dimensions)
 S3method(st_set_bbox,stars)
 S3method(st_set_bbox,stars_proxy)
 S3method(st_transform,stars)
-S3method(st_transform_proj,stars)
 S3method(time,stars)
 S3method(write_stars,stars)
 S3method(write_stars,stars_proxy)
@@ -165,7 +164,6 @@ export(st_set_bbox)
 export(st_set_dimensions)
 export(st_sfc2xy)
 export(st_tile)
-export(st_transform_proj)
 export(st_warp)
 export(st_xy2sfc)
 export(write_mdim)
@@ -197,7 +195,6 @@ importFrom(graphics,plot.window)
 importFrom(graphics,rasterImage)
 importFrom(graphics,text)
 importFrom(graphics,title)
-importFrom(lwgeom,st_transform_proj)
 importFrom(methods,as)
 importFrom(methods,new)
 importFrom(methods,slot)

NEWS.md

@@ -1,5 +1,7 @@
 # version 0.6-4
 
+* move `lwgeom` dependency to Suggests; using `st_transform_proj()` requires loading `lwgeom` first
+
 # version 0.6-3
 
 * `st_downsample()` has argument `offset` to pixel-shift downsampled images

R/init.R

@@ -12,11 +12,6 @@
 #' @import units
 NULL
 
-# re-export:
-#' @importFrom lwgeom st_transform_proj
-#' @export
-lwgeom::st_transform_proj
-
 setOldClass("stars")
 setOldClass("stars_proxy")
 

R/transform.R

@@ -92,17 +92,16 @@ st_transform.stars =  function(x, crs, ...) {
 }
 
 #' @name st_transform
-#' @export
 st_transform_proj.stars =  function(x, crs, ...) {
 
 	stopifnot(!is.na(crs), !is.na(st_crs(x)))
 
 	if (has_sfc(x)) {
-    	if (!requireNamespace("lwgeom", quietly = TRUE))
-        	stop("package lwgeom required, please install it first") # nocov
 		try_proj = function(x, crs) {
 			ret = try(st_transform(x, crs), silent = TRUE)
 			if (inherits(ret, "try-error")) {
+				if (!requireNamespace("lwgeom", quietly = TRUE))
+					stop("package lwgeom required, please install it first") # nocov
 				if (inherits(crs, "crs"))
 					crs = crs$proj4string
 				ret = lwgeom::st_transform_proj(x, crs)