diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index 86caf88f2..cde528943 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,8 +1,10 @@
-1998-11-09  Mikael Djurfeldt  <mdj@barbara.nada.kth.se>
+1998-11-10  Mikael Djurfeldt  <mdj@barbara.nada.kth.se>
 
 	* boot-9.scm (readline-options, readline-enable, readline.disable,
 	readline-set!: New options interface.
 
+	* readline.scm (readline-port): Use readline-options-interface.
+
 1998-11-05  Mikael Djurfeldt  <mdj@barbara.nada.kth.se>
 
 	* boot-9.scm: Set the repl start module in `top-repl' instead of
diff --git a/ice-9/readline.scm b/ice-9/readline.scm
index 38dac130f..48e424dcd 100644
--- a/ice-9/readline.scm
+++ b/ice-9/readline.scm
@@ -82,7 +82,7 @@
 
 (define-public readline-port
   (let ((do (lambda (r/w)
-	      (if (memq 'history-file (read-options-interface))
+	      (if (memq 'history-file (readline-options-interface))
 		  (r/w (or (getenv history-variable)
 			   history-file))))))
     (lambda ()