diff --git a/srfi/ChangeLog b/srfi/ChangeLog
index bf82f0b34..6927b0254 100644
--- a/srfi/ChangeLog
+++ b/srfi/ChangeLog
@@ -1,3 +1,9 @@
+2005-02-04  Kevin Ryde  <user42@zip.com.au>
+
+	* srfi-1.scm (list=): Correction to arguments passed to given elt=,
+	spec is (elt= e[i] e[i+1]) for lists i and i+1, previously the first
+	arg was always from list 0 not list i.
+
 2005-01-29  Kevin Ryde  <user42@zip.com.au>
 
 	* srfi-1.scm (lset-adjoin): Actually use the given `=' procedure.
diff --git a/test-suite/ChangeLog b/test-suite/ChangeLog
index 9dd4fa219..7f51f0100 100644
--- a/test-suite/ChangeLog
+++ b/test-suite/ChangeLog
@@ -1,3 +1,7 @@
+2005-02-04  Kevin Ryde  <user42@zip.com.au>
+
+	* tests/srfi-1.test (list=): New tests.
+
 2005-01-29  Kevin Ryde  <user42@zip.com.au>
 
 	* tests/numbers.test (ash): New tests.