markTime -> userMark; queueEmpty -> idle

This commit is contained in:
Barret Schloerke
2018-12-12 10:58:28 -05:00
parent fddf94a341
commit a9cf632f53
3 changed files with 8 additions and 8 deletions

View File

@@ -367,10 +367,10 @@ RLog <- R6Class(
}
},
queueEmpty = function(domain = NULL) {
msg$log("queueEmpty")
idle = function(domain = NULL) {
msg$log("idle")
private$appendEntry(domain, list(
action = "queueEmpty"
action = "idle"
))
},
@@ -409,10 +409,10 @@ RLog <- R6Class(
self$thawReactiveVal(self$keyIdStr(reactId, key), domain)
},
markTime = function(domain = NULL) {
msg$log("markTime")
userMark = function(domain = NULL) {
msg$log("userMark")
private$appendEntry(domain, list(
action = "markTime"
action = "userMark"
))
}

View File

@@ -12,7 +12,7 @@ reactLogHandler <- function(req) {
# log time
withReactiveDomain(shinysession, {
rLog$markTime(getDefaultReactiveDomain())
rLog$userMark(getDefaultReactiveDomain())
})
return(httpResponse(

View File

@@ -157,7 +157,7 @@ ReactiveEnvironment <- R6Class(
.inFlush <<- TRUE
on.exit({
.inFlush <<- FALSE
rLog$queueEmpty(domain = NULL)
rLog$idle(domain = NULL)
})
while (hasPendingFlush()) {