aboutsummaryrefslogtreecommitdiff
path: root/examples/dataset-metadata.scm
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-11-17 11:25:21 +0300
committerMunyoki Kilyungi2023-11-17 11:25:21 +0300
commit2df9eb5a6adf15ddb19d4f00f1bc5a1c35f492c7 (patch)
tree089a3570dbd218081bf12c73878e58c462787c56 /examples/dataset-metadata.scm
parentb32bf3e486c2d819db8d7af770ab098137173be8 (diff)
downloadgn-transform-databases-2df9eb5a6adf15ddb19d4f00f1bc5a1c35f492c7.tar.gz
Make species identifiers consistent.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/dataset-metadata.scm')
-rwxr-xr-xexamples/dataset-metadata.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/dataset-metadata.scm b/examples/dataset-metadata.scm
index 1c02bb3..26ca7f2 100755
--- a/examples/dataset-metadata.scm
+++ b/examples/dataset-metadata.scm
@@ -81,7 +81,9 @@
Title)))
(set gnt:hasGOTreeValue (field GeneChip Go_tree_value))
(set xkos:classifiedUnder
- (string->identifier "" (remap-species-identifiers (field Species Fullname))))
+ (string->identifier "" (remap-species-identifiers (field Species Fullname))
+ #:separator ""
+ #:proc string-capitalize-first))
(set gnt:hasGeoSeriesId
(ontology 'geoSeries:
(string-trim-both (field GeneChip GeoPlatform))))))