diff options
Diffstat (limited to 'examples/dump-dataset-metadata.scm')
| -rwxr-xr-x | examples/dump-dataset-metadata.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm index 8f381b7..a127e57 100755 --- a/examples/dump-dataset-metadata.scm +++ b/examples/dump-dataset-metadata.scm @@ -191,9 +191,9 @@ (field DatasetStatus DatasetStatusName))) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) - #:separator "" - #:proc string-capitalize-first)) + "set" (field InbredSet Name) + #:separator "" + #:proc string-capitalize-first)) (set gnt:hasTissue (string->identifier "tissue" (field Tissue Short_Name))) (set gnt:usesNormalization @@ -273,7 +273,7 @@ '^^xsd:date)) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) @@ -303,7 +303,7 @@ '^^xsd:date)) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) @@ -350,7 +350,7 @@ (field Tissue Short_Name))) (set gnt:belongsToSet (string->identifier - "inbredSet" (field InbredSet Name) + "set" (field InbredSet Name) #:separator "" #:proc string-capitalize-first)))) |