Skip to content
Permalink
Browse files

Fix printing of members that are R6 objects. Closes #88

  • Loading branch information...
wch committed Jul 1, 2016
1 parent c8f917c commit a567e869daac559a81f12bff26e999b570cf40d7
Showing with 2 additions and 1 deletion.
  1. +2 −1 R/print.R
@@ -106,7 +106,8 @@ object_summaries <- function(x, exclude = NULL) {
} else {
obj <- .subset2(x, name)
if (is.function(obj)) deparse(args(obj))[[1L]]
else if (is.environment(obj)) "environment"
# Plain environments (not envs with classes, like R6 or RefClass objects)
else if (is.environment(obj) && identical(class(obj), "environment")) "environment"
else if (is.null(obj)) "NULL"
else if (is.atomic(obj)) trim(paste(as.character(obj), collapse = " "))
else paste(class(obj), collapse = ", ")

0 comments on commit a567e86

Please sign in to comment.
You can’t perform that action at this time.