diff options
| author | Munyoki Kilyungi | 2026-01-26 21:52:10 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-01-26 21:52:10 +0300 |
| commit | 27894fd4e5bf7e4221fea3224a44b654cdc3a0e1 (patch) | |
| tree | 2bd32b60ce7a6cf15a59d2b940fcb9d6b7d47ccc /examples/classification.scm | |
| parent | 493f65f358f399143a20a9068bc0336596f8dc0e (diff) | |
| download | gn-transform-databases-27894fd4e5bf7e4221fea3224a44b654cdc3a0e1.tar.gz | |
Mark-up inbredset description as HTML.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/classification.scm')
| -rwxr-xr-x | examples/classification.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/examples/classification.scm b/examples/classification.scm index c9d9d63..4753f1c 100755 --- a/examples/classification.scm +++ b/examples/classification.scm @@ -185,7 +185,8 @@ (set rdfs:label (field InbredSet FullName)) (set skos:prefLabel (field InbredSet Name InbredSetName)) (set gnt:genetic_type (field InbredSet GeneticType)) - (set dct:description (sanitize-rdf-string (field InbredSet description))) + (set dct:description (annotate-field (field InbredSet description) + '^^rdf:HTML)) (set gnt:uses_mapping_method (string->identifier "mapping_method" (field MappingMethod Name) #:separator "_")) (set gnt:has_set_code (field InbredSet InbredSetCode)) |