fix: update internal script to new MassBank database scheme

rformassspectrometry · Dec 5, 2023 · ad73cdf · ad73cdf
1 parent a9538e0
commit ad73cdf
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: CompoundDb
 Type: Package
 Title: Creating and Using (Chemical) Compound Annotation Databases
-Version: 1.7.0
+Version: 1.7.1
 Authors@R: c(person(given = "Jan", family = "Stanstrup",
                     email = "[email protected]",
 		    role = c("aut"),

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,9 @@
+# CompoundDb version 1.7
+
+## Changes in version 1.7.1
+
+- Adapt script to create CompDb from MassBank to new MassBank database format.
+
 # CompoundDb version 1.3
 
 ## Changes in version 1.3.3

diff --git a/inst/scripts/massbank_to_compdb.R b/inst/scripts/massbank_to_compdb.R
@@ -46,7 +46,7 @@ massbank_to_compdb <- function(con, path = ".") {
     version <- dbGetQuery(con, "select * from LAST_UPDATE")
     metad <- make_metadata(source = "MassBank",
                            source_version = sub("\n", "", version$VERSION[1]),
-                           source_date = format(version$TIME,
+                           source_date = format(version$LAST_UPDATE,
                                                 format = "%Y-%m-%d"),
                            url = "https://massbank.eu/MassBank/")
     message("Creating database ... ", appendLF = FALSE)