changed time label color; updated default argument to renderReactLog

rstudio · Mar 21, 2016 · c637bba · c637bba
1 parent bdc6554
commit c637bba
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/graph.R b/R/graph.R
@@ -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')

diff --git a/inst/www/reactive-graph.html b/inst/www/reactive-graph.html
@@ -44,7 +44,7 @@
 .node .tspanTime{
   font-weight: bold;
   font-size: 87%;
-  fill: #a7d9b7;
+  fill: #444444;
   user-select: none;
   transition: fill 0.75s ease;
 }