aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorMunyoki Kilyungi2024-07-30 12:43:29 +0300
committerMunyoki Kilyungi2024-07-30 12:43:29 +0300
commit68e2eda0b3520bd8f4aa4bd3a4fad0e1613aa142 (patch)
tree5d6762f54ee168f4efac4e14b0976acc3fd71749 /examples
parent2d2583e7579d41730ec6e5a74e4925b6da34f142 (diff)
downloadgn-transform-databases-68e2eda0b3520bd8f4aa4bd3a4fad0e1613aa142.tar.gz
Update GeneRIF metadata to contain the version-id.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/generif.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/examples/generif.scm b/examples/generif.scm
index ea89cb4..da41dcb 100755
--- a/examples/generif.scm
+++ b/examples/generif.scm
@@ -90,6 +90,7 @@
(remap-species-identifiers (field Species Fullname))
#:separator ""
#:proc string-capitalize-first)]
+ [version-id (field GeneRIF versionId)]
[categories
(remove (lambda (x)
(or (eq? x #f)
@@ -129,6 +130,7 @@
(field Investigators LastName)
(field Investigators Email)))
"")
+ (format #f "dct:hasVersion \"~s\"^^xsd:int ; " version-id)
(if (not (null? categories))
(format #f
"~{gnt:belongsToCategory ~s ; ~}"