(compile-interface-spec): Bug fix: the keyword argument is "renamer"

not "rename".

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index d0bd11c..d1ac9a7 100644 (file)
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -2652,7 +2652,7 @@
   (define keys 
     ;; sym     key      quote?
     '((:select #:select #t)
-      (:rename #:rename #f)))
+      (:renamer #:renamer #f)))
   (if (not (pair? (car spec)))
       `(',spec)
       `(',(car spec)