From a2a7002f629c57447b6099ac7385c5335e947e7f Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Mon, 22 May 2023 11:10:06 +0300 Subject: Fix broken utf-8 chars when dumping an investigator's names * examples/dump-dataset-metadata.scm (dump-investigators) : Binary convert fields first to latin1 then utf8. Signed-off-by: Munyoki Kilyungi --- examples/dump-dataset-metadata.scm | 12 ++++-------- 1 file changed, 4 insertions(+), 8 deletions(-) diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm index 154f147..4747700 100755 --- a/examples/dump-dataset-metadata.scm +++ b/examples/dump-dataset-metadata.scm @@ -64,18 +64,14 @@ (field Investigators LastName) (field Investigators Email)) (set rdf:type 'foaf:Person) - ;; Special case Yohan Bossé's name since the last name has - ;; unprintable characters. (set foaf:name (string-append (field Investigators FirstName) " " (if (string=? (field Investigators FirstName) "Yohan") "Bossé" (field Investigators LastName)))) - (set foaf:givenName (field Investigators FirstName)) - ;; Special case Yohan Bossé's name since the last name has - ;; unprintable characters. - (set foaf:familyName (if (string=? (field Investigators FirstName) "Yohan") - "Bossé" - (field Investigators LastName))) + (set foaf:givenName + (field ("CAST(CONVERT(BINARY CONVERT(FirstName USING latin1) USING utf8) AS VARCHAR(100))" FirstName))) + (set foaf:familyName + (field ("CAST(CONVERT(BINARY CONVERT(LastName USING latin1) USING utf8) AS VARCHAR(100))" LastName))) (set foaf:homepage (field Investigators Url)) (set gn:address (field Investigators Address)) (set gn:city (field Investigators City)) -- cgit v1.2.3