read_habitatmap: run st_is_valid only once (but still not used - slow)

inbo · Sep 27, 2024 · 7ea3f36 · 7ea3f36
1 parent 279bff4
commit 7ea3f36
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/read_habitatdata.R b/R/read_habitatdata.R
@@ -1053,8 +1053,9 @@ read_habitatmap <-
 
     if (fix_geom) {
       # temporarily dropped because st_is_valid takes too long
+      # validities <- st_is_valid(habitatmap)
       # n_invalid <- sum(
-      #   !st_is_valid(habitatmap) | is.na(st_is_valid(habitatmap))
+      #   !validities | is.na(validities)
       # )
       # if (n_invalid > 0) {
         habitatmap <- st_make_valid(habitatmap)