Index: openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl	7 Jul 2007 15:49:10 -0000	1.20
+++ openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl	24 Jul 2007 13:21:39 -0000	1.21
@@ -19,6 +19,7 @@
   $page volatile
 
   #ns_log notice "--sc package=[[$page package_id] serialize]"
+  ns_log notice "--sc $page [$page set publish_status]"
 
   if {[$page set publish_status] eq "production"} {
     # no data source for for pages under construction
@@ -113,6 +114,15 @@
       owner xowiki
     }
     acs_sc::impl::new_from_spec -spec {
+      name "::xowiki::FormPage"
+      aliases {
+        datasource ::xowiki::datasource
+        url ::xowiki::url
+      }
+      contract_name FtsContentProvider
+      owner xowiki
+    }
+    acs_sc::impl::new_from_spec -spec {
       name "::xowiki::File"
       aliases {
         datasource ::xowiki::datasource
@@ -127,6 +137,7 @@
     acs_sc::impl::delete -contract_name FtsContentProvider -impl_name ::xowiki::Page
     acs_sc::impl::delete -contract_name FtsContentProvider -impl_name ::xowiki::PlainPage
     acs_sc::impl::delete -contract_name FtsContentProvider -impl_name ::xowiki::PageInstance
+    acs_sc::impl::delete -contract_name FtsContentProvider -impl_name ::xowiki::FormPage
     acs_sc::impl::delete -contract_name FtsContentProvider -impl_name ::xowiki::File
   }
 }