diff --git a/app.R b/app.R
index 39b0bc4..050eb4c 100644
--- a/app.R
+++ b/app.R
@@ -493,7 +493,7 @@ server <- function(input, output, session) {
     
     nodeNet <- nodes[(nodes$code %in% .selections$pressStatus$code[.selections$pressStatus$status %in% c('On')]),]
     
-    save(nodes, edges, nodeNet, file = 'tmp.RData')
+    #save(nodes, edges, nodeNet, file = 'tmp.RData')
     
     if (nrow(nodeNet)>0) {
       #do pressures