Polishing keydef data

data-raw/keydef.R

@@ -5,18 +5,14 @@ lines <- readLines(url)
 first <- which(grepl("_keyDefinitions", lines))
 last <- tail(which(grepl("^}", lines)), 1)
 
-
-
 ct <- V8::v8()
-
 def <- paste(c("keydef = {", lines[(first + 1):last]), collapse = "\n")
 ct$eval(def)
 keydefs <- ct$get("keydef")
 
 usethis::use_data(keydefs, overwrite = TRUE, internal = TRUE)
 
-
 tibble::enframe(keydef) |>
-  unnest_wider(value) |>
+  tidyr::unnest_wider(value) |>
   dplyr::arrange(keyCode) |>
   View()