Move pillar to Suggests

cynkra · Oct 7, 2023 · 12af937 · 12af937
1 parent bc81bf3
commit 12af937
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 5 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -59,7 +59,6 @@ Imports:
     magrittr,
     memoise,
     methods,
-    pillar (>= 1.7.0),
     purrr (>= 1.0.0),
     rlang (>= 1.0.2),
     tibble (>= 3.0.0),
@@ -87,6 +86,7 @@ Suggests:
     mockr,
     nycflights13,
     odbc,
+    pillar,
     pixarfilms,
     pool,
     progress,

diff --git a/NAMESPACE b/NAMESPACE
@@ -103,7 +103,6 @@ S3method(nest_join,dm_zoomed)
 S3method(pack_join,data.frame)
 S3method(pack_join,dm)
 S3method(pack_join,dm_zoomed)
-S3method(pillar_shaft,dm_keys)
 S3method(print,dm)
 S3method(print,dm_cg_code_block)
 S3method(print,dm_examine_cardinalities)
@@ -373,7 +372,6 @@ importFrom(grDevices,rgb)
 importFrom(igraph,E)
 importFrom(igraph,V)
 importFrom(methods,is)
-importFrom(pillar,pillar_shaft)
 importFrom(utils,head)
 importFrom(utils,packageVersion)
 importFrom(utils,str)

diff --git a/R/dm-package.R b/R/dm-package.R
@@ -18,6 +18,5 @@
 #' @importFrom igraph V E
 #' @importFrom utils head tail str packageVersion
 #' @importFrom grDevices col2rgb colors rgb
-#' @importFrom pillar pillar_shaft
 ## usethis namespace: end
 NULL
diff --git a/R/keys.R b/R/keys.R
@@ -36,11 +36,13 @@ vec_proxy_compare.dm_keys <- function(x, ...) {
   as.data.frame(do.call(rbind, full))
 }
 
-#' @export
 pillar_shaft.dm_keys <- function(x, ...) {
   x <- map_chr(x, commas, max_commas = 3)
   pillar::pillar_shaft(x)
 }
+on_load({
+  s3_register("pillar::pillar_shaft", "dm_keys", pillar_shaft.dm_keys)
+})
 
 #' @export
 format.dm_keys <- function(x, ...) {