diff options
| author | Munyoki Kilyungi | 2026-02-16 13:33:25 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-02-16 13:33:25 +0300 |
| commit | d8345bc41d9c5567021e328734a16a1c8998f8d8 (patch) | |
| tree | 90e021b6b5cefc8099286c9a3b5a8a8d46a724e7 /transform/triples.scm | |
| parent | 89b70e6d35dd1044c4025616693d20fd4217df50 (diff) | |
| download | gn-transform-databases-d8345bc41d9c5567021e328734a16a1c8998f8d8.tar.gz | |
Make url char separator optional in "string->identifier".
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'transform/triples.scm')
| -rw-r--r-- | transform/triples.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/transform/triples.scm b/transform/triples.scm index 13758e5..7f96eea 100644 --- a/transform/triples.scm +++ b/transform/triples.scm @@ -39,6 +39,7 @@ #:optional #:key (ontology "gn:") (separator "") + (url-char #\_) (proc (lambda (x) x))) "Convert STR to a turtle identifier after replacing illegal characters with an underscore and prefixing with gn:PREFIX." @@ -55,7 +56,7 @@ characters with an underscore and prefixing with gn:PREFIX." (char-numeric? c) (char=? c #\_)) c - #\_)) + url-char)) (proc str))))))) |