diff options
Diffstat (limited to 'examples/genelist.scm')
| -rwxr-xr-x | examples/genelist.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/genelist.scm b/examples/genelist.scm index 78df9d7..2d94a3b 100755 --- a/examples/genelist.scm +++ b/examples/genelist.scm @@ -84,11 +84,11 @@ "gene" (regexp-substitute/global #f "[^A-Za-z0-9:]" (string-trim-both - (field GeneList GeneSymbol)) + (field ("CONCAT_WS('_', GeneSymbol, GeneID, AlignID)" GENE_UID))) 'pre "_" 'post) #:proc (lambda (x) x)) (set rdf:type 'gnc:GeneSymbol) - (set rdfs:label (field GeneList GeneSymbol)) + (set gnt:geneSymbol (field GeneList GeneSymbol)) (set dct:description (sanitize-rdf-string (field GeneList GeneDescription))) (set gnt:hasGeneId (ontology 'gene: (field GeneList GeneId))) (set dct:references |