diff options
| author | Munyoki Kilyungi | 2026-02-06 05:32:10 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2026-02-06 05:32:10 +0300 |
| commit | 418568557b2b0d2ca977e5fe1594ed280b4f92f8 (patch) | |
| tree | d1c287d7622c8b85f98efd1aeb3ddd01c87304f3 /transform/strings.scm | |
| parent | d078ef4f51a3b47e7013f061698b5da0a95ebf55 (diff) | |
| download | gn-transform-databases-418568557b2b0d2ca977e5fe1594ed280b4f92f8.tar.gz | |
Move blank-p to strings.scm.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'transform/strings.scm')
| -rw-r--r-- | transform/strings.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/transform/strings.scm b/transform/strings.scm index 51c5ed1..7b62349 100644 --- a/transform/strings.scm +++ b/transform/strings.scm @@ -17,8 +17,12 @@ string-capitalize-first normalize-string-field fix-email-id + blank-p investigator-attributes->id)) +(define (blank-p str) + (if (string-blank? str) #f str)) + (define (lower-case-and-replace-spaces str) (string-map (lambda (c) |