diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index fb59e64a7..cdaf403c0 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,10 @@
+2004-09-26  Kevin Ryde  <user42@zip.com.au>
+
+	* optargs.scm (let-optional-template, let-keywords-template): Change
+	"(begin body)" to "(let () body)" for empty bindings, since the former
+	allows "internal defines" in body leak out to the surrounding
+	environment.
+
 2004-09-04  Kevin Ryde  <user42@zip.com.au>
 
 	* streams.scm (stream-for-each-many): Correction, should recurse into
diff --git a/test-suite/ChangeLog b/test-suite/ChangeLog
index 32182c3fe..8ae096272 100644
--- a/test-suite/ChangeLog
+++ b/test-suite/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-26  Kevin Ryde  <user42@zip.com.au>
+
+	* tests/optargs.test (let-keywords, let-keywords*, let-optional,
+	let-optional*): Add tests of internal defines when no bindings.
+
 2004-09-09  Kevin Ryde  <user42@zip.com.au>
 
 	* tests/ports.test (port-column): Further tests, of new \a \b \r.