Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql	7 Nov 2003 13:15:49 -0000	1.3
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.xql	13 Jan 2005 13:56:16 -0000	1.4
@@ -152,14 +152,6 @@
     </querytext>
 </fullquery>
 
-<fullquery name="bug_tracker::project_delete.unset_project_revisions">
-    <querytext>
-        update cr_items
-        set live_revision = null, latest_revision = null
-        where parent_id = :folder_id
-    </querytext>
-</fullquery>
-
 <fullquery name="bug_tracker::project_delete.min_bug_id">
     <querytext>
         select min(bug_id)
@@ -168,5 +160,23 @@
     </querytext>
 </fullquery>
 
+<fullquery name="bug_tracker::project_new.bt_projects_insert">
+    <querytext>
+      insert into bt_projects
+        (project_id, folder_id, root_keyword_id)
+       values
+         (:project_id, :folder_id, :keyword_id)
+    </querytext>
+</fullquery>
+
+<fullquery name="bug_tracker::project_new.bt_components_insert">
+    <querytext>
+      insert into bt_components
+        (component_id, project_id, component_name)
+      values
+        (:component_id, :project_id, 'General')
+    </querytext>
+</fullquery>
+
  
 </queryset>