about summary refs log tree commit diff
path: root/examples
diff options
context:
space:
mode:
authorMunyoki Kilyungi2026-01-26 21:52:10 +0300
committerMunyoki Kilyungi2026-01-26 21:52:10 +0300
commit27894fd4e5bf7e4221fea3224a44b654cdc3a0e1 (patch)
tree2bd32b60ce7a6cf15a59d2b940fcb9d6b7d47ccc /examples
parent493f65f358f399143a20a9068bc0336596f8dc0e (diff)
downloadgn-transform-databases-27894fd4e5bf7e4221fea3224a44b654cdc3a0e1.tar.gz
Mark-up inbredset description as HTML.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/classification.scm3
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))