diff options
| author | Munyoki Kilyungi | 2023-08-19 16:10:02 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2023-08-19 16:10:02 +0300 |
| commit | dcfe92323fa82c30a199e8d9640668800a93f47b (patch) | |
| tree | aa9a16d8273b2611d349a0aec353a95ad5a02b3e /examples/dump-dataset-metadata.scm | |
| parent | bc6e327b906f1c47be46ee397a3be46a222211f0 (diff) | |
| download | gn-transform-databases-dcfe92323fa82c30a199e8d9640668800a93f47b.tar.gz | |
Rename inbredSet identifier
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/dump-dataset-metadata.scm')
| -rwxr-xr-x | examples/dump-dataset-metadata.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm index e099bac..43ac144 100755 --- a/examples/dump-dataset-metadata.scm +++ b/examples/dump-dataset-metadata.scm @@ -159,7 +159,10 @@ (set gdmt:hasRightsInfo (string-downcase (field DatasetStatus DatasetStatusName))) (set gnt:belongsToInbredSet - (string->identifier "inbredSet" (field InbredSet Name InbredSetName))) + (string->identifier + "inbredSet" (field InbredSet Name) + #:separator "" + #:proc string-capitalize-first)) (set gnt:hasTissue (string->identifier "tissue" (field Tissue Short_Name))) (set gnt:usesNormalization |