Index: openacs-4/packages/bug-tracker/tcl/install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/install-procs.tcl,v
diff -u -r1.2.4.1 -r1.2.4.2
--- openacs-4/packages/bug-tracker/tcl/install-procs.tcl	11 Jan 2005 00:26:48 -0000	1.2.4.1
+++ openacs-4/packages/bug-tracker/tcl/install-procs.tcl	1 Aug 2005 23:41:25 -0000	1.2.4.2
@@ -60,6 +60,13 @@
                     workflow::case::state_changed_handler -case_id $case_id
                 }
             }
+            1.4 1.4.1 {
+		# update for all the projects a new component_keyword_id
+		db_foreach get_instance_name { select ck.heading, bp.project_id from cr_keywords ck, bt_projects bp where ck.keyword_id = bp.root_keyword_id } {
+		    set component_keyword_id [content::keyword::new -heading "Components $heading"]
+		    db_dml new_root_keyword_id { update bt_projects set component_keyword_id = :component_keyword_id where project_id = :project_id }
+		}
+            }
         }
 }