Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.451 -r1.452 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 21 Feb 2012 13:09:14 -0000 1.451 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 6 Mar 2012 18:44:24 -0000 1.452 @@ -1533,13 +1533,22 @@ set parent_id [expr {$package_id == [my package_id] ? [my parent_id] : [$package_id folder_id]}] + # we might consider make this configurable + set use_package_path true + if {[regexp {^:(..):(.+)$} $(link) _ lang stripped_name]} { # language link (it starts with a ':') - array set "" [$package_id item_ref -default_lang [my lang] -parent_id $parent_id \ + array set "" [$package_id item_ref \ + -use_package_path $use_package_path \ + -default_lang [my lang] \ + -parent_id $parent_id \ ${lang}:$stripped_name] set (link_type) language } else { - array set "" [$package_id item_ref -default_lang [my lang] -parent_id $parent_id \ + array set "" [$package_id item_ref \ + -use_package_path $use_package_path \ + -default_lang [my lang] \ + -parent_id $parent_id \ $(link)] } #my msg "link '$(link)' => [array get {}]"