diff options
Diffstat (limited to 'Biz/Bild.scm')
-rwxr-xr-x | Biz/Bild.scm | 4 |
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)) |