aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/dump-phenotype.scm4
-rwxr-xr-xexamples/dump-publication.scm4
2 files changed, 4 insertions, 4 deletions
diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm
index 51ecb64..7582d94 100755
--- a/examples/dump-phenotype.scm
+++ b/examples/dump-phenotype.scm
@@ -102,9 +102,9 @@
pmid)))
(publication-id (field Publication Id)))
(if (string-null? pmid)
- (string->identifier "publication"
+ (string->identifier "unpublished"
(number->string publication-id))
- (ontology 'pubmed: pmid))))))
+ (ontology 'publication: pmid))))))
(call-with-target-database
diff --git a/examples/dump-publication.scm b/examples/dump-publication.scm
index ef2a36d..ba77256 100755
--- a/examples/dump-publication.scm
+++ b/examples/dump-publication.scm
@@ -39,8 +39,8 @@
pmid)))
(publication-id (field Publication Id)))
(if (string-null? pmid)
- (ontology 'publication:
- publication-id)
+ (string->identifier "unpublished"
+ (number->string publication-id))
(ontology 'publication: pmid)))
(set rdf:type 'gn:publication)
(set gn:pubMedId (ontology 'pubmed: (field ("IFNULL(PubMed_ID, '')" pubmedId))))