* Use eval instead of eval-in-module.

diff --git a/oop/ChangeLog b/oop/ChangeLog
index 246c4e3..c953623 100644 (file)
--- a/oop/ChangeLog
+++ b/oop/ChangeLog
@@ -1,3 +1,8 @@
+2000-12-15  Dirk Herrmann  <D.Herrmann@tu-bs.de>
+
+       * goops/save.scm (load-objects):  eval-in-module is deprecated.
+       Use eval instead.
+
 2000-11-24  Dirk Herrmann  <D.Herrmann@tu-bs.de>
 
        * goops.scm:  Don't export removed %logand any more.

diff --git a/oop/goops/save.scm b/oop/goops/save.scm
index 148264d..e2a9e54 100644 (file)
--- a/oop/goops/save.scm
+++ b/oop/goops/save.scm
@@ -869,7 +869,7 @@
        (let loop ((sexp (read file)))
         (if (not (eof-object? sexp))
             (begin
-              (eval-in-module sexp m)
+              (eval sexp m)
               (loop (read file)))))))
     (module-map (lambda (name var)
                  (cons name (variable-ref var)))