about summary refs log tree commit diff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/dump-phenotype.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm
index 842e7e8..242e835 100755
--- a/examples/dump-phenotype.scm
+++ b/examples/dump-phenotype.scm
@@ -40,7 +40,9 @@
     (set gn:name (field PublishFreeze Name))
     (set gn:fullName (field PublishFreeze FullName))
     (set gn:shortName (field PublishFreeze ShortName))
-    (set gn:createTime (field PublishFreeze CreateTime))
+    (set dct:created (annotate-field
+                      (field PublishFreeze CreateTime)
+                      '^^xsd:date))
     (set gn:datasetOfInbredSet
          (string->identifier "inbredSet" (field InbredSet Name InbredSetName)))))