From ad236987b1b320ed649a589ab228d91700b56038 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Wed, 31 May 2023 19:14:01 +0300 Subject: Remove "^[Nn]one$" from some fields from the InfoFiles table Signed-off-by: Munyoki Kilyungi --- examples/dump-dataset-metadata.scm | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm index 042c16a..56efcf2 100755 --- a/examples/dump-dataset-metadata.scm +++ b/examples/dump-dataset-metadata.scm @@ -131,7 +131,10 @@ (set rdf:type (string->symbol (field ("IF(GenoFreeze.Id IS NOT NULL, 'gn:genotypeDataset', IF(PublishFreeze.Id IS NOT NULL, 'gn:phenotypeDataset', 'gn:dataset'))" rdfType)))) - (set gn:name (field InfoFiles InfoPageName)) + (set gn:name (regexp-substitute/global + #f "^[Nn]one$" + (field InfoFiles InfoPageName) + "")) (set dct:created (field ("IFNULL(GenoFreeze.CreateTime, IFNULL(PublishFreeze.CreateTime, IFNULL(ProbeSetFreeze.CreateTime, '')))" createTimeGenoFreeze))) @@ -163,7 +166,11 @@ (and (not (string-prefix-ci? "no geo series" (field Datasets GeoSeries))) (field Datasets GeoSeries))) - (set gn:title (field InfoFiles Title)) + (set gn:title + (regexp-substitute/global + #f "^[Nn]one$" + (field InfoFiles Title) + "")) (set gn:specifics (sanitize-rdf-string (field InfoFiles Specifics))) (set gn:datasetGroup (field Datasets DatasetName DatasetGroup)) (set gn:aboutCases (sanitize-rdf-string (field Datasets AboutCases))) -- cgit v1.2.3