fixes #144

workspace/R/utils.R

@@ -518,7 +518,7 @@ stage_national_data <- function(include = c("attribute",
     
     if (!(file.exists(out_path_flines) | file.exists(out_path_attributes))) {
       fline <- sf::st_zm(sf::read_sf(nhdplus_data,
-                                     get_flowline_layer_name(nhdplus_data)))
+                                     nhdplusTools:::get_flowline_layer_name(nhdplus_data)))
     }
     
     if ("attribute" %in% include) {