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.198 -r1.199 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 17 Apr 2010 12:25:05 -0000 1.198 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 18 Apr 2010 21:10:37 -0000 1.199 @@ -1081,18 +1081,10 @@ set parent_id [my folder_id] } array set "" [my item_ref -normalize_name false \ + -use_package_path $use_package_path \ -default_lang $default_lang \ -parent_id $parent_id \ $link] - if {!$(item_id) && $use_package_path} { - foreach package [my package_path] { - array set "" [$package item_ref -normalize_name false \ - -default_lang $default_lang \ - -parent_id [$package id] \ - $link] - if {$(item_id)} break - } - } if {!$(item_id) && $use_site_wide_pages} { set page [::xowiki::Package get_site_wide_page -name $(prefix):$(stripped_name)] if {$page ne ""} { Index: openacs-4/packages/xowiki/tcl/weblog-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/weblog-procs.tcl,v diff -u -r1.46 -r1.47 --- openacs-4/packages/xowiki/tcl/weblog-procs.tcl 15 Apr 2010 15:41:54 -0000 1.46 +++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl 18 Apr 2010 21:10:37 -0000 1.47 @@ -30,7 +30,10 @@ set folder_id [::$package_id folder_id] set form_item_ids [list] foreach t [split $forms |] { - set page [$package_id get_page_from_item_ref -use_prototype_pages true $t] + set page [$package_id get_page_from_item_ref \ + -use_prototype_pages true \ + -use_package_path true \ + $t] #my ds "weblog form $t => $page" if {$page ne ""} { lappend form_item_ids [$page item_id]