mirror of
https://github.com/rstudio/shiny.git
synced 2026-04-29 03:00:45 -04:00
Rename flush.react to flushReact
This commit is contained in:
12
R/react.R
12
R/react.R
@@ -323,16 +323,16 @@ Observer <- setRefClass(
|
||||
get('.ReactiveEnvironment', envir=.GlobalEnv, inherits=F)
|
||||
}
|
||||
|
||||
flush.react <- function() {
|
||||
flushReact <- function() {
|
||||
.getReactiveEnvironment()$flush()
|
||||
}
|
||||
|
||||
.test <- function () {
|
||||
values <- Values$new()
|
||||
obs <- Observer$new(function() {print(values$get('foo'))})
|
||||
flush.react()
|
||||
flushReact()
|
||||
values$set('foo', 'bar')
|
||||
flush.react()
|
||||
flushReact()
|
||||
|
||||
values$set('a', 100)
|
||||
values$set('b', 250)
|
||||
@@ -340,9 +340,9 @@ flush.react <- function() {
|
||||
values$get('a') + values$get('b')
|
||||
})
|
||||
obs2 <- Observer$new(function() {print(paste0('a+b: ', observable$getValue()))})
|
||||
flush.react()
|
||||
flushReact()
|
||||
values$set('b', 300)
|
||||
flush.react()
|
||||
flushReact()
|
||||
values$mset(list(a = 10, b = 20))
|
||||
flush.react()
|
||||
flushReact()
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user