changed time label color; updated default argument to renderReactLog

This commit is contained in:
Barbara Borges Ribeiro
2016-03-21 22:19:45 +00:00
parent bdc6554ca8
commit c637bba867
2 changed files with 2 additions and 2 deletions

View File

@@ -49,7 +49,7 @@ showReactLog <- function(time = TRUE) {
utils::browseURL(renderReactLog(time = as.logical(time)))
}
renderReactLog <- function(sessionToken = NULL, time) {
renderReactLog <- function(sessionToken = NULL, time = TRUE) {
templateFile <- system.file('www/reactive-graph.html', package='shiny')
html <- paste(readLines(templateFile, warn=FALSE), collapse='\r\n')
tc <- textConnection(NULL, 'w')

View File

@@ -44,7 +44,7 @@ svg {
.node .tspanTime{
font-weight: bold;
font-size: 87%;
fill: #a7d9b7;
fill: #444444;
user-select: none;
transition: fill 0.75s ease;
}