about summary refs log tree commit diff
path: root/examples/dump-publication.scm
diff options
context:
space:
mode:
Diffstat (limited to 'examples/dump-publication.scm')
-rwxr-xr-xexamples/dump-publication.scm4
1 files changed, 2 insertions, 2 deletions
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))))