Index: openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	17 Aug 2006 01:44:26 -0000	1.2
+++ openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	24 Sep 2006 11:39:26 -0000	1.3
@@ -14,8 +14,17 @@
   }
 
   ad_proc -private ::xowiki::before-uninstall {} {
-    ::xowiki::sc::unregister_implementations
-    ::xowiki::notifications-uninstall
+      ::xowiki::sc::unregister_implementations
+      ::xowiki::notifications-uninstall
+
+      # Delete object types
+      
+      content::type::delete -content_type ::xowiki::Object -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
+      content::type::delete -content_type ::xowiki::PageInstance -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
+      content::type::delete -content_type ::xowiki::PageTemplate -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
+      content::type::delete -content_type ::xowiki::File -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
+      content::type::delete -content_type ::xowiki::PlainPage -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
+      content::type::delete -content_type ::xowiki::Page -drop_children_p 1 -drop_table_p 1 -drop_objects_p 1
   }