From d10d8c090a838ab709da14046bc33e5a67db6104 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Fri, 21 Mar 2014 10:11:33 +0100
Subject: Update interval variabel list on saving a dataset, fixes #1

---
 inst/GUI/gmkin.R | 1 +
 1 file changed, 1 insertion(+)

(limited to 'inst')

diff --git a/inst/GUI/gmkin.R b/inst/GUI/gmkin.R
index 6de4de2e..40045e92 100644
--- a/inst/GUI/gmkin.R
+++ b/inst/GUI/gmkin.R
@@ -391,6 +391,7 @@ keep_ds_changes_handler <- function(h, ...) {
   ds[[ds.cur]]$sampling_times <<- sort(unique(tmpd$time))
   ds[[ds.cur]]$time_unit <<- svalue(ds.e.stu)
   ds[[ds.cur]]$observed <<- unique(tmpd$name)
+  observed.all <<- union(observed.all, ds[[ds.cur]]$observed)
   ds[[ds.cur]]$unit <<- svalue(ds.e.obu)
   ds[[ds.cur]]$replicates <<- max(aggregate(tmpd$time, 
                                             list(tmpd$time, tmpd$name), length)$x)
-- 
cgit v1.2.1