fix data source handling

r-geoflow · May 7, 2024 · d67e662 · d67e662
1 parent dafcabe
commit d67e662
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/geoflow_data.R b/R/geoflow_data.R
@@ -166,8 +166,8 @@ geoflow_data <- R6Class("geoflow_data",
           if(!any(sapply(data_props, function(x){x$key=="source"})) && !any(sapply(data_props, function(x){x$key=="dir"}))){
             stop("One or more data 'source' (or 'dir', as directory for sources) is mandatory")
           }
-          if(any(sapply(data_props, function(x){x$key=="source"}))) self$setSource(data_props$source$values)
         }
+        if(any(sapply(data_props, function(x){x$key=="source"}))) self$setSource(data_props$source$values)
 
         #sourceSql
         if(!is.null(data_props$sourceSql)){