From b3ca71bfd6ed67ea328f5b49a0f71f8d4c1a5cfc Mon Sep 17 00:00:00 2001
From: Mark Liversedge <liversedge@gmail.com>
Date: Mon, 9 May 2016 10:13:15 +0100
Subject: [PATCH] R Optimise refresh

.. don't when not visible as it slows everyone down !
---
 src/Charts/RChart.cpp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Charts/RChart.cpp b/src/Charts/RChart.cpp
index ddd3eda9a..e3d9d66e9 100644
--- a/src/Charts/RChart.cpp
+++ b/src/Charts/RChart.cpp
@@ -380,6 +380,9 @@ RChart::setState(QString)
 void
 RChart::runScript()
 {
+    // don't run until we can be seen!
+    if (!isVisible()) return;
+
     if (script->toPlainText() != "") {
 
         // run it !!