Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Merge branch 'master' of github.com:rstudio/rstudio

  • Loading branch information...
commit f0f045ea2bff91a460a580f3c16af098ba4186c2 2 parents 9246fd3 + 22a3edd
@jjallaire jjallaire authored
Showing with 8 additions and 0 deletions.
  1. +8 −0 src/cpp/session/modules/SessionData.R
View
8 src/cpp/session/modules/SessionData.R
@@ -32,6 +32,14 @@
# make sure we are dealing with a data frame
if (!is.data.frame(x))
x <- as.data.frame(x)
+
+ # add a column for custom row names if necessary
+ rowNames <- row.names(x)
+ if (!identical(rowNames,as.character(1:length(rowNames)))) {
+ colNames <- names(x)
+ x$row.names <- rowNames
+ x <- x[c("row.names", colNames, recursive=TRUE)]
+ }
# call viewData (prepare columns so they are either double or character)
invisible(.Call("rs_viewData",
Please sign in to comment.
Something went wrong with that request. Please try again.