diff --git a/transducers/0.5.3/src/transducers.mappings.sld b/transducers/0.5.3/src/transducers.mappings.sld
index 7b67bb01..86220c29 100644
--- a/transducers/0.5.3/src/transducers.mappings.sld
+++ b/transducers/0.5.3/src/transducers.mappings.sld
@@ -25,10 +25,10 @@
           (scheme case-lambda)
           (srfi 128)
           (rename (srfi 146)
-                  (mapping-fold srfi-146#mapping-fold)
-                  (mapping-fold/reverse srfi-146#mapping-fold/reverse))
+                  (mapping-fold srfi-146:mapping-fold)
+                  (mapping-fold/reverse srfi-146:mapping-fold/reverse))
           (rename (srfi 146 hash)
-                  (hashmap-fold srfi-146#hashmap-fold))
+                  (hashmap-fold srfi-146:hashmap-fold))
           (transducers base))

   (cond-expand
@@ -79,7 +79,7 @@
     ;; taking the result of the reducer as the new sentinel value each time.
     (define (mapping-fold f sentinel xs)
       (call/cc (lambda (cc)
-                 (srfi-146#mapping-fold
+                 (srfi-146:mapping-fold
                    (lambda (key value s)
                      (let ((result (f s (cons key value))))
                        (if (reduced? result)
@@ -93,7 +93,7 @@
     ;; Operates in the reverse order of the items compared to mapping-fold.
     (define (reverse-mapping-fold f sentinel xs)
       (call/cc (lambda (cc)
-                 (srfi-146#mapping-fold/reverse
+                 (srfi-146:mapping-fold/reverse
                    (lambda (key value s)
                      (let ((result (f s (cons key value))))
                        (if (reduced? result)
@@ -109,7 +109,7 @@
     ;; taking the result of the reducer as the new sentinel value each time.
     (define (hashmap-fold f sentinel xs)
       (call/cc (lambda (cc)
-                 (srfi-146#hashmap-fold
+                 (srfi-146:hashmap-fold
                    (lambda (key value s)
                      (let ((result (f s (cons key value))))
                        (if (reduced? result)