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) {