remove helper function that's only used once

scverse · Sep 20, 2023 · 4edfa90 · 4edfa90
1 parent 7c48007
commit 4edfa90
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/R/AbstractAnnData.R b/R/AbstractAnnData.R
@@ -93,7 +93,11 @@ AbstractAnnData <- R6::R6Class("AbstractAnnData", # nolint
         if (!is.null(self[[attr_key]])) {
           slot_keys <- self[[attr_key]]()
           if (length(slot_keys) > 0) {
-            cat("    ", pretty_print(attribute, slot_keys), "\n", sep = "")
+            cat(
+              "    ", attribute, ":",
+              paste("'", slot_keys, "'", collapse = ", "),
+              "\n", sep = ""
+            )
           }
         }
       }

diff --git a/R/utilities.R → R/utils.R b/R/utilities.R → R/utils.R
@@ -1,7 +1,3 @@
-pretty_print <- function(label, value) {
-  paste0(label, ": ", paste0("'", value, "'", collapse = ", "))
-}
-
 wrap_message <- function(...) {
   txt <- paste0(..., collapse = "")
   paste(strwrap(txt, exdent = 2L), collapse = "\n")