diff --git a/R/session/init.R b/R/session/init.R index cd6b67065..b44cc6c96 100644 --- a/R/session/init.R +++ b/R/session/init.R @@ -64,13 +64,7 @@ init_last <- function() { .vsc.browser <- .vsc$show_browser .vsc.viewer <- .vsc$show_viewer .vsc.page_viewer <- .vsc$show_page_viewer - - # assign functions that are optional: - for (funcName in c("View")) { - if (funcName %in% ls(.vsc)) { - assign(funcName, .vsc[[funcName]]) - } - } + View <- .vsc.view environment() }) attach(exports, name = .vsc.name, warn.conflicts = FALSE) diff --git a/R/session/vsc.R b/R/session/vsc.R index f2c4c1ed0..6395772e1 100644 --- a/R/session/vsc.R +++ b/R/session/vsc.R @@ -454,7 +454,7 @@ if (show_view) { } } - View <- show_dataview + rebind("View", show_dataview, "utils") } attach <- function() {