From fd16bad7be580a3844bcddfcc9e46ee9953410e6 Mon Sep 17 00:00:00 2001 From: Stefan Israelsson Tampe Date: Wed, 15 Aug 2018 13:31:52 +0200 Subject: log works in decimal --- modules/language/python/string.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'modules/language/python/string.scm') diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm index 7d5bdd7..4261a0a 100644 --- a/modules/language/python/string.scm +++ b/modules/language/python/string.scm @@ -292,7 +292,7 @@ (() (string-trim s)) ((x . _) - (let ((l (map (lambda (x) (if (string? x) (string-ref x 0) x)) l))) + (let ((l (map (lambda (x) (if (string? x) (string-ref x 0) x)) (to-list x)))) (string-trim s (lambda (ch) (member ch l))))))) (define-py (py-rstrip rstrip s . l) @@ -300,7 +300,8 @@ (() (string-trim-right s)) ((x . _) - (let ((l (map (lambda (x) (if (string? x) (string-ref x 0) x)) x))) + (let ((l (map (lambda (x) (if (string? x) (string-ref x 0) x)) + (to-list x)))) (string-trim-right s (lambda (ch) (member ch l))))))) (define-py (py-partition partition s (sep )) -- cgit v1.2.3