From e2cead1ca3d496fda31e4f00dbaa79d1043da5d7 Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Fri, 9 Jun 2023 15:10:33 +0300
Subject: Use PublishFreeze Name as a fallback for InfoPageName

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 examples/dump-phenotype.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'examples')

diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm
index 5b05a79..e4d20c9 100755
--- a/examples/dump-phenotype.scm
+++ b/examples/dump-phenotype.scm
@@ -98,7 +98,7 @@
          (ontology 'dataset:
                    (regexp-substitute/global
                     #f "[^A-Za-z0-9:]"
-                    (field ("IFNULL(PublishFreeze.Name, '')" DatasetName))
+                    (field ("IFNULL(InfoFiles.InfoPageName, IFNULL(PublishFreeze.Name, ''))" DatasetName))
                     'pre "_" 'post)))
     (set gn:phenotypeOfPublication
          (let ((pmid (field
-- 
cgit v1.2.3