summaryrefslogtreecommitdiff
path: root/modules/language/python/string.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/string.scm')
-rw-r--r--modules/language/python/string.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm
index d0e9c91..2a8fbcc 100644
--- a/modules/language/python/string.scm
+++ b/modules/language/python/string.scm
@@ -11,6 +11,7 @@
py-expandtabs py-find py-rfind
py-isalnum py-isalpha py-isdigit py-islower
py-isspace py-isupper py-istitle py-join py-ljust
+ py-rjust
py-rljust py-lower py-upper py-lstrip py-rstrip
py-partition py-replace py-strip py-title
py-rpartitio py-rindex py-split py-rsplit py-splitlines
@@ -481,13 +482,12 @@
(define-py (py-zfill zfill s width)
(let* ((n (len s))
- (w (pk (pylist-slice s 0 n 1))))
+ (w (pylist-slice s 0 n 1)))
(let lp ((i 0))
(if (< i n)
(let ((ch (string-ref s i)))
(if (char-numeric? ch)
(let lp ((j (max 0 (- i width))))
- (pk i j)
(if (< j i)
(begin
(string-set! w j #\0)