~ chicken-core (chicken-5) fe846d82e57270d229ff5fa00f065ea648143763

commit fe846d82e57270d229ff5fa00f065ea648143763
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Dec 10 11:53:17 2011 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sat Dec 10 11:55:43 2011 +0100

    trivial error fix for module-environment (spotted by moritz)

diff --git a/modules.scm b/modules.scm
index 9f48089b..f248890a 100644
--- a/modules.scm
+++ b/modules.scm
@@ -885,4 +885,4 @@
 (define (module-environment mname #!optional (ename mname))
   (let* ((mod (##sys#find-module/import-library mname 'module-environment))
 	 (saved (module-saved-environments mod)))
-    (##sys#make-structure 'environment ename (car saved))))
+    (##sys#make-structure 'environment ename (car saved) #t)))