Index: library/nx/nx.tcl =================================================================== diff -u -r8f14fdaf0de110b56e3132a178267f3372a32235 -rdd34cd1a57fb3255f6fe638482c51cdcf3a483c8 --- library/nx/nx.tcl (.../nx.tcl) (revision 8f14fdaf0de110b56e3132a178267f3372a32235) +++ library/nx/nx.tcl (.../nx.tcl) (revision dd34cd1a57fb3255f6fe638482c51cdcf3a483c8) @@ -2254,10 +2254,8 @@ foreach slot [$origin ::nsf::methods::object::info::slotobjects -type ::nx::Slot] { lappend slots $slot } - puts stderr "replacing domain and manager from <$origin> to <$dest> in slots <$slots>" + #puts stderr "replacing domain and manager from <$origin> to <$dest> in slots <$slots>" foreach oldslot $slots { - puts stderr "check slot <$oldslot> class [nsf::relation $oldslot class] s?[$oldslot info has type ::nx::Slot]" - #if {![$oldslot info has type ::nx::Slot]} continue set container [expr {[$oldslot per-object] ? "per-object-slot" : "slot"}] set newslot [::nx::slotObj -container $container $dest [namespace tail $oldslot]] if {[$oldslot domain] eq $origin} {$newslot domain $dest}