From b1dc3dfca19eb30e9d73f6a411b36d33abe8938f Mon Sep 17 00:00:00 2001
From: Joe Cheng <joe@rstudio.com>
Date: Thu, 25 Jan 2018 18:11:54 -0800
Subject: [PATCH] Restore label to plotObj reactive

---
 R/render-plot.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/render-plot.R b/R/render-plot.R
index ca6664e8f..8d86d6487 100644
--- a/R/render-plot.R
+++ b/R/render-plot.R
@@ -93,7 +93,7 @@ renderPlot <- function(expr, width='auto', height='auto', res=72, ...,
   # return a promise). The idea is that the (cached) return value from this
   # reactive can be used for varying width/heights, as it includes the
   # displaylist, which is resolution independent.
-  drawReactive <- reactive({
+  drawReactive <- reactive(label = "plotObj", {
     # Don't invalidate when width/height changes.
     dims <- if (execOnResize) getDims() else isolate(getDims())
     pixelratio <- session$clientData$pixelratio %OR% 1