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.40 -r1.41
--- openacs-4/packages/xowiki/tcl/weblog-procs.tcl	7 Feb 2009 14:39:28 -0000	1.40
+++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl	12 Feb 2009 15:07:15 -0000	1.41
@@ -26,11 +26,12 @@
     {compute_summary false}
   }
 
-  ::xowiki::Weblog proc instantiate_forms {-entries_of:required -package_id:required} {
+  ::xowiki::Weblog proc instantiate_forms {{-default_lang ""} -entries_of:required -package_id:required} {
     set folder_id [::$package_id folder_id]
     set form_items [list]
     foreach t [split $entries_of |] {
-      set form_item_id [::xo::db::CrClass lookup -name $t -parent_id $folder_id]
+      # Entry $t might contain a package prefix
+      set form_item_id [$package_id lookup -default_lang $default_lang -name $t]
       if {$form_item_id == 0} {
         # The form does not exist in the CR. Maybe we can create it
         # via a prototype page?