aboutsummaryrefslogtreecommitdiff
path: root/examples/dataset-metadata.scm
diff options
context:
space:
mode:
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))))))