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.20 -r1.21
--- openacs-4/packages/xowiki/tcl/weblog-procs.tcl	3 Sep 2007 21:07:53 -0000	1.20
+++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl	12 Sep 2007 18:57:03 -0000	1.21
@@ -82,7 +82,7 @@
     if {$entries_of ne ""} {
       set form_items [list]
       foreach t [split $entries_of |] {
-        set form_item_id [::xowiki::Form lookup -name $t -parent_id $folder_id]
+        set form_item_id [::xo::db::CrClass lookup -name $t -parent_id $folder_id]
         if {$form_item_id == 0} {error "Cannot lookup page $t"}
         lappend form_items $form_item_id
       }
Index: openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/Attic/xowiki-portlet-procs.tcl,v
diff -u -r1.89 -r1.90
--- openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	3 Sep 2007 21:07:53 -0000	1.89
+++ openacs-4/packages/xowiki/tcl/xowiki-portlet-procs.tcl	12 Sep 2007 18:57:03 -0000	1.90
@@ -2277,7 +2277,7 @@
     set return_url [::xo::cc url]?[::xo::cc actual_query]
 
     if {![info exists form_item_id]} {
-      set form_item_id [::xowiki::Form lookup -name $form -parent_id $folder_id]
+      set form_item_id [::xo::db::CrClass lookup -name $form -parent_id $folder_id]
       if {$form_item_id == 0} {error "Cannot lookup page $form"}
     }