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 -N -r1.98 -r1.99
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	24 Aug 2013 15:39:08 -0000	1.98
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	25 Aug 2013 19:51:41 -0000	1.99
@@ -1541,7 +1541,7 @@
 	    if {[$o exists object_package_id]} {
 	      $o set package_id [$o set object_package_id]
 	    } else {
-	      ns_log warning "[namespace tail [$o info type]] $o has no package_id and no object_package_id"
+	      ns_log warning "[namespace tail [$o info class]] $o has no package_id and no object_package_id"
 	    }
 	  }
           if {[catch {$o initialize_loaded_object} errorMsg]} {