From b03ce9b304466e7f620ef852bdf377938e2a8279 Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Mon, 22 May 2023 10:30:30 +0300
Subject: Replace broken char-sets with an empty string

* dump/strings.scm (sanitize-rdf-string): Add extra elements---broken
chars---to replace with "".

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 dump/strings.scm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'dump')

diff --git a/dump/strings.scm b/dump/strings.scm
index c67d7fc..849b3c3 100644
--- a/dump/strings.scm
+++ b/dump/strings.scm
@@ -72,7 +72,13 @@ association list mapping substrings to their replacements."
    '(("\r" . "\\r")
      ("\n" . "\\n")
      ("\"" . "'")
-     ("\v" . ""))))
+     ("\v" . "")
+     ("\xad" . "")
+     ("\x28" . "")
+     ("\x29" . "")
+     ("\xa0" . " ")
+     ("\x02" . "")
+     ("\x01" . ""))))
 
 (define (snake->lower-camel str)
   (let ((char-list (string->list str)))
-- 
cgit v1.2.3