From 0a2045050517a2317083bd2ec17bae09e03c4a11 Mon Sep 17 00:00:00 2001 From: Stefan Israelsson Tampe Date: Mon, 14 May 2018 17:59:41 +0200 Subject: further improvements --- modules/language/python/string.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'modules/language/python/string.scm') diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm index ff90ef1..ad47a20 100644 --- a/modules/language/python/string.scm +++ b/modules/language/python/string.scm @@ -61,7 +61,9 @@ i))))) (define-py0 (bool s) - (not (= (len s) 0))) + (if (= (len s) 0) + #f + s)) (define-py (py-capitalize capitalize s) (let* ((n (len s)) -- cgit v1.2.3