Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -r1.231 -r1.232 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 13 Jul 2010 11:22:23 -0000 1.231 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 13 Jul 2010 18:11:04 -0000 1.232 @@ -899,8 +899,8 @@ # Page not found so far. Is the parent-page a folder-link? # ::xo::db::CrClass get_instance_from_db -item_id $parent_id - if {[$parent_id is_link_page] && [$parent_id is_folder_page]} { - set target [$parent_id get_page_from_link_page] + if {$parent_id > 0 && [$parent_id is_link_page] && [$parent_id is_folder_page]} { + set target [$parent_id get_target_from_link_page] #my log "LINK LOOKUP from target-package [$target package_id] source package $(package_id)" return [[$target package_id] lookup \ -use_package_path $use_package_path \ @@ -1226,7 +1226,7 @@ # check link (todo should happen in package->lookup?) ::xo::db::CrClass get_instance_from_db -item_id $(parent_id) if {[$(parent_id) is_link_page] && [$(parent_id) is_folder_page]} { - set target [$(parent_id) get_page_from_link_page] + set target [$(parent_id) get_target_from_link_page] #$target set_resolve_context -package_id [my id] -parent_id $(parent_id) #my msg "LINK prefixed LOOKUP from target-package [$target package_id] source package [my id]" array set "" [[$target package_id] prefixed_lookup -parent_id [$target item_id] \