Fix no-visible-binding-for-global-variable-note-in-r-cmd-check

Change-Id: Icb4ecdb2a3d02bbae8bef7c21d03b88a7107a4d2
diff --git a/R/textMetadata.R b/R/textMetadata.R
index b23bc49..2e5372f 100644
--- a/R/textMetadata.R
+++ b/R/textMetadata.R
@@ -17,7 +17,7 @@
 #' If there are metadata columns you cannot make sense of, please ignore them. The function simply returns all the metadata it gets from the server.
 #'
 #' @importFrom urltools url_encode
-#' @importFrom dplyr bind_rows relocate mutate
+#' @importFrom dplyr across bind_rows relocate mutate where
 #' @importFrom tibble as_tibble
 #' @importFrom tidyr pivot_wider
 #'
@@ -29,6 +29,8 @@
 #' @export
 setMethod("textMetadata", "KorAPConnection",
  function(kco, textSigle, verbose = kco@verbose) {
+  # https://stackoverflow.com/questions/8096313/no-visible-binding-for-global-variable-note-in-r-cmd-check
+  key <- 0
   if (length(textSigle) > 1)
     do.call(bind_rows, Map(function(atomicSigle)
       textMetadata(kco, atomicSigle), textSigle))