From 5cd4588ef284fa2a2e01d3e515522817de015eb3 Mon Sep 17 00:00:00 2001
From: Winston Chang <winston@stdout.org>
Date: Thu, 30 May 2019 14:38:05 -0500
Subject: [PATCH] Use grep(value=TRUE)

---
 R/reactives.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/reactives.R b/R/reactives.R
index 667f181e4..7b51aa7e5 100644
--- a/R/reactives.R
+++ b/R/reactives.R
@@ -425,7 +425,9 @@ ReactiveValues <- R6Class(
       }
 
       dep.keys <- .dependents$keys()
-      dep.keys <- dep.keys[grepl(paste('^\\Q', key, ':', '\\E', '\\d+$', sep=''), dep.keys)]
+      dep.keys <- grep(
+        paste('^\\Q', key, ':', '\\E', '\\d+$', sep=''), dep.keys, value = TRUE
+      )
       lapply(
         .dependents$mget(dep.keys),
         function(ctx) {