about summary refs log tree commit diff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/dump-publication.scm15
1 files changed, 10 insertions, 5 deletions
diff --git a/examples/dump-publication.scm b/examples/dump-publication.scm
index ba77256..784d815 100755
--- a/examples/dump-publication.scm
+++ b/examples/dump-publication.scm
@@ -44,11 +44,16 @@
             (ontology 'publication: pmid)))
     (set rdf:type 'gn:publication)
     (set gn:pubMedId (ontology 'pubmed: (field ("IFNULL(PubMed_ID, '')" pubmedId))))
-    (set gn:title (field Publication Title))
-    (set gn:journal (field Publication Journal))
-    (set gn:volume (field Publication Volume))
-    (set gn:pages (field Publication Pages))
-    (set gn:month (field Publication Month))
+    (set gn:title (delete-substrings (field Publication Title)
+                                     "Unknown"))
+    (set gn:journal (delete-substrings (field Publication Journal)
+                                       "Unknown"))
+    (set gn:volume (delete-substrings (field Publication Volume)
+                                      "Unknown"))
+    (set gn:pages (delete-substrings (field Publication Pages)
+                                     "Unknown"))
+    (set gn:month (delete-substrings (field Publication Month)
+                                     "Unknown"))
     (set gn:year (field Publication Year))
     (multiset gn:author
               ;; The authors field is a comma