From b8b1fb49a269e3f33dde70a72b0d6b441fba9f44 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Mon, 12 May 2014 17:20:59 +0200
Subject: Fix initialisation of err variable after uploading data

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

(limited to 'inst')

diff --git a/inst/GUI/gmkin.R b/inst/GUI/gmkin.R
index a2fb132..71a9f04 100644
--- a/inst/GUI/gmkin.R
+++ b/inst/GUI/gmkin.R
@@ -376,7 +376,7 @@ new_ds_from_csv_handler <- function(h, ...) {
                                                      length)$x),
                           data = tmpdl)
     ds[[ds.cur]]$data$override <<- as.numeric(NA)
-    if (!is.null(ds[[ds.cur]]$data$err)) ds[[ds.cur]]$data$err <<- 1
+    if (is.null(ds[[ds.cur]]$data$err)) ds[[ds.cur]]$data$err <<- 1
     update_ds.df()
     ds.gtable[,] <- ds.df
     update_ds_editor()
-- 
cgit v1.2.1