Index: openacs-4/packages/xowiki/tcl/link-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/link-procs.tcl,v diff -u -r1.60 -r1.61 --- openacs-4/packages/xowiki/tcl/link-procs.tcl 1 Feb 2009 16:25:16 -0000 1.60 +++ openacs-4/packages/xowiki/tcl/link-procs.tcl 7 Feb 2009 14:39:28 -0000 1.61 @@ -89,7 +89,7 @@ my instvar package_id set page [my page] set item_id [my resolve] - #my msg "--u resolve returns $item_id" + #my msg "--u resolve [my name] returns $item_id, page=[$page name] vars=[lsort [$page info vars]]" if {$item_id} { $page lappend references [list $item_id [my type]] ::xowiki::Package require $package_id @@ -445,7 +445,7 @@ my set package_id $id #my log "-- INITIALIZE $id" #::xowiki::Package initialize -package_id $id - my log "--u setting package_id to $id" + #my log "--u setting package_id to $id" # lookup the item from the found folder return [::xo::db::CrClass lookup -name [my name] -parent_id [$id set parent_id]] }