diff --git a/R/peek.R b/R/peek.R index 8d050ce..40d04b1 100644 --- a/R/peek.R +++ b/R/peek.R @@ -32,7 +32,9 @@ fun <- function(what) { call[[1L]] <- quote(trace) call$where <- topenv(parent.frame()) call$tracer <- informant - eval.parent(call) + suppressMessages(eval.parent(call)) + + invisible() } #' Peek all functions from a package