add stats:: to setNames function calls

helps pass R CMD check

DESCRIPTION

@@ -164,4 +164,4 @@ Collate:
     'test-export.R'
     'timer.R'
     'update-input.R'
-RoxygenNote: 6.1.0
+RoxygenNote: 6.1.1

R/server.R

@@ -66,7 +66,7 @@ addResourcePath <- function(prefix, directoryPath) {
   # the corresponding httpuv server object.
   if (!is.null(getShinyOption("server")))
   {
-    getShinyOption("server")$setStaticPath(.list = setNames(normalizedPath, prefix))
+    getShinyOption("server")$setStaticPath(.list = stats::setNames(normalizedPath, prefix))
   }
 
   # .globals$resourcePaths persists across runs of applications.

R/shiny.R

@@ -576,7 +576,7 @@ ShinySession <- R6Class(
 
             # Apply preprocessor functions for inputs that have them.
             values$input <- lapply(
-              setNames(names(values$input), names(values$input)),
+              stats::setNames(names(values$input), names(values$input)),
               function(name) {
                 preprocess <- private$getSnapshotPreprocessInput(name)
                 preprocess(values$input[[name]])
@@ -604,7 +604,7 @@ ShinySession <- R6Class(
 
             # Apply snapshotPreprocess functions for outputs that have them.
             values$output <- lapply(
-              setNames(names(values$output), names(values$output)),
+              stats::setNames(names(values$output), names(values$output)),
               function(name) {
                 preprocess <- private$getSnapshotPreprocessOutput(name)
                 preprocess(values$output[[name]])