summaryrefslogtreecommitdiff
path: root/Biz/Bild.scm
diff options
context:
space:
mode:
Diffstat (limited to 'Biz/Bild.scm')
-rwxr-xr-xBiz/Bild.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/Biz/Bild.scm b/Biz/Bild.scm
index 4e1d490..1fcae96 100755
--- a/Biz/Bild.scm
+++ b/Biz/Bild.scm
@@ -144,14 +144,14 @@
(define ns? symbol?)
(define (ns->path ns)
- (let ((to-path (lambda (s) (string/replace s #\. #\/))))
+ (let ((to-path (lambda (s) (string/replace-char s #\. #\/))))
(cond
((symbol? ns) (to-path (symbol->string ns)))
((string? ns) (to-path ns))
(else (error "ns should be a string or symbol")))))
(define (path->ns path)
- (let ((to-ns (lambda (s) (string/replace s #\/ #\.))))
+ (let ((to-ns (lambda (s) (string/replace-char s #\/ #\.))))
(cond
((symbol? path) (to-ns (symbol->string path)))
((string? path) (to-ns path))