diff options
| author | Munyoki Kilyungi | 2023-11-17 11:24:52 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2023-11-17 11:24:52 +0300 |
| commit | b32bf3e486c2d819db8d7af770ab098137173be8 (patch) | |
| tree | f28ee58d271a922751077d71d73b8ecb308c5ab5 | |
| parent | 092b9b4967133fc5a04d9fbf2255f4ce07dedb8b (diff) | |
| download | gn-transform-databases-b32bf3e486c2d819db8d7af770ab098137173be8.tar.gz | |
Revert "Make Phenotypy InbredSet classification consistent."
This reverts commit 092b9b4967133fc5a04d9fbf2255f4ce07dedb8b.
| -rwxr-xr-x | examples/phenotype.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/phenotype.scm b/examples/phenotype.scm index 11211a2..4378809 100755 --- a/examples/phenotype.scm +++ b/examples/phenotype.scm @@ -54,7 +54,9 @@ (set rdf:type 'gnc:Phenotype) (set xkos:classifiedUnder (string->identifier - "set" (field InbredSet Name InbredSetName))) + "set" (field InbredSet Name InbredSetName) + #:separator "" + #:proc string-capitalize-first)) ;; This is the trait's name (set rdfs:label (let ((trait-id (field PublishXRef Id))) |