Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v
diff -u -r1.40 -r1.41
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	28 Sep 2007 07:41:23 -0000	1.40
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	28 Sep 2007 09:08:52 -0000	1.41
@@ -1154,7 +1154,9 @@
             $o class $ot
           }
         }
-        $o initialize_loaded_object
+        if {[$o istype ::xo::db::Object]} {
+          $o initialize_loaded_object
+        }
         #my log "--DB more = $continue [$o serialize]" 
       }
     }