Use Add rather than Assign

Author: peterdesmet

R/col_types.R

@@ -16,7 +16,7 @@ cols <- function(schema) {
 
   # Create col_types
   col_types <- purrr::map(fields, field_to_col)
-  # Assign names: list("name1" = <collector_character>, "name2" = ...)
+  # Add names: list("name1" = <collector_character>, "name2" = ...)
   names(col_types) <- field_names
 
   # Replicate structure of readr::col_spec
@@ -44,7 +44,7 @@ field_to_col <- function(field) {
   bare_number <- if (field$bareNumber %||% "" != FALSE) TRUE else FALSE
   format <- field$format %||% "default" # Undefined => default
 
-  # Assign types and formats
+  # Add types and formats
   col_type <- switch(
     type,
     "string" = col_string(enum),

R/resource.R

@@ -47,7 +47,7 @@ resource <- function(package, resource_name) {
     )
   }
 
-  # Assign data_location attribute (based on path, then df, then data)
+  # Add data_location attribute (based on path, then df, then data)
   if (length(resource$path) != 0) {
     if (all(is_url(resource$path))) {
       data_location <- "url"