Make unchecking pathways to sink persistentv0.6.4

Closes #4. This got lost with the GUI overhaul for v0.6.x

2 files changed, 5 insertions, 0 deletions

diff --git a/NEWS.md b/NEWS.md
index 805ce1e..bad01bd 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -4,6 +4,10 @@
 
 - Various small corrections of unexpected or incorrect GUI behaviour. See git commit logs for details.
 
+### Bug fixes
+
+- Unchecking the pathway to sink in the model editor was ignored.
+
 ## gmkin 0.6-3 (2015-11-28)
 
 - Various small layout and GUI logic improvements based on the suggestions by Stefan Meinecke (Umweltbundesamt Germany). Thanks, also for the financial support from the Umweltbundesamt!
diff --git a/inst/GUI/gmkin.R b/inst/GUI/gmkin.R
index b58f2e7..ef60139 100644
--- a/inst/GUI/gmkin.R
+++ b/inst/GUI/gmkin.R
@@ -931,6 +931,7 @@ show_m_spec <- function() {
     # Set R and Ext values separately, as multiple selections are not supported

     svalue(m.e.to[[obs.i]]) <<- obs.to_string_R

     m.e.to[[obs.i]]$call_Ext("select", String(obs.to_string_JS))

+    svalue(m.e.sink[[obs.i]]) <<- m.cur$spec[[obs.i]]$sink

   }

 }

 show_m_spec()