Merge pull request #1396 from orichters/scenconf

don't fail on empty config file rows
remindmodel · Sep 6, 2023 · 2e38975 · 2e38975
2 parents 376c8f7 + fdde5f8
commit 2e38975
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/scripts/start/readCheckScenarioConfig.R b/scripts/start/readCheckScenarioConfig.R
@@ -21,7 +21,10 @@ readCheckScenarioConfig <- function(filename, remindPath = ".", testmode = FALSE
   } else {
     cfg <- gms::readDefaultConfig(remindPath)
   }
-  scenConf <- read.csv2(filename, stringsAsFactors = FALSE, row.names = 1, na.strings = "", comment.char = "#")
+  scenConf <- read.csv2(filename, stringsAsFactors = FALSE, na.strings = "", comment.char = "#")
+  scenConf <- scenConf[! is.na(scenConf[1]), ]
+  rownames(scenConf) <- scenConf[, 1]
+  scenConf[1] <- NULL
   toolong <- nchar(rownames(scenConf)) > 75
   if (any(toolong)) {
     warning("These titles are too long: ",