undefined columns selected when fromDataFrame() without SME section

[sneumann]

For a file exported by MS-Dial 3.98 from TripleQ data without SME section I get for

  mzTabTable <- readMzTab(mzTabfile)
  ## To turn these tables into objects, use the R6 class constructor method `new()`:
  mzTabObject <- MzTab$new()$fromDataFrame(mzTabTable)

The traceback

7: stop("undefined columns selected")
6: `[.data.frame`(df, , colnames(df) != "") at read_mz_tab.R#159
5: df[, colnames(df) != ""] at read_mz_tab.R#159
4: extractTable(mztab.table, "SEH", "SME") at read_mz_tab.R#187
3: extractSmallMoleculeEvidence(MzTabDataFrame) at mz_tab.R#210
2: MzTab$new()$fromDataFrame(mzTabTable) at #6

So

rmzTab-m/R/read_mz_tab.R

Line 159 in 660ca47

df[, colnames(df) != ""]

should check that there is an actual df to speak of :-) PR coming.
Yours, Steffen