diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index db26b0cf0..72be35b8e 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,9 @@
+2001-06-30  Dirk Herrmann  <D.Herrmann@tu-bs.de>
+
+	* arrays.scm:  Don't install a read-hash-extension for 'b':  #b
+	is already defined by R5RS.  Further, there is already a working
+	read syntax for bitvectors, starting with #*.
+
 2001-06-30  Martin Grabmueller  <mgrabmue@cs.tu-berlin.de>
 
 	* Makefile.am (ice9_sources): Removed tags.scm.
diff --git a/ice-9/arrays.scm b/ice-9/arrays.scm
index 7d249795e..b08de5e97 100644
--- a/ice-9/arrays.scm
+++ b/ice-9/arrays.scm
@@ -47,8 +47,8 @@
   (for-each (lambda (char template)
 	      (read-hash-extend char
 				(make-array-proc template)))
-	    '(#\b #\a #\u #\e #\s #\i #\c #\y   #\h #\l)
-	    '(#t  #\a 1   -1  1.0 1/3 0+i #\nul s   l)))
+	    '(#\a #\u #\e #\s #\i #\c #\y   #\h #\l)
+	    '(#\a 1   -1  1.0 1/3 0+i #\nul s   l)))
 
 (let ((array-proc (lambda (c port)
 		    (read:array c port))))