From 543ea6352c894f7ada6795b5458faa3adfd9834b Mon Sep 17 00:00:00 2001
From: usr110 <m.aliabbas@gmail.com>
Date: Tue, 20 Sep 2016 12:21:18 +0100
Subject: [PATCH] Update text for baseline cycling. Relevant to #18

---
 app/server.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/app/server.R b/app/server.R
index 3f3c2e5..bdb5108 100644
--- a/app/server.R
+++ b/app/server.R
@@ -89,7 +89,7 @@ shinyServer(function(input, output, session){
     input$conditionedPanels
     
     if (input$conditionedPanels < 8)
-      HTML("Baseline Cycling (%): ", sessionData$baselineSummary[["% Cyclists in the Total Population"]], "\n")
+      HTML("Baseline Cycling, Total Population (%): ", sessionData$baselineSummary[["% Cyclists in the Total Population"]], "\n")
     else
       HTML("")
   })