Update R/tar-terra-vect.R

Co-authored-by: Nicholas Tierney <njtierney@users.noreply.github.com>
njtierney · Mar 14, 2024 · 52a5aef · 52a5aef
1 parent a056755
commit 52a5aef
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/R/tar-terra-vect.R b/R/tar-terra-vect.R
@@ -114,12 +114,12 @@ tar_terra_vect <- function(name,
  gdal <- "ENCODING=UTF-8"
  }
 
- if (filetype == "ESRI Shapefile") {
-  #special handling of ESRI shapefiles because the output is a dir of multiple files.
-  format <- create_format_terra_vect_shz(options = gdal, ...)
-  } else {
-  format <- create_format_terra_vect(filetype, options = gdal, ...)
- }
+format <- ifelse(
+ test = filetype == "ESRI Shapefile",
+ #special handling of ESRI shapefiles because the output is a dir of multiple files.
+ yes = create_format_terra_vect_shz(options = gdal, ...),
+ no =  create_format_terra_vect(filetype, options = gdal, ...)
+)
 
  targets::tar_target_raw(
  name = name,