Index: openacs-4/packages/bug-tracker/www/bug-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug-add.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/bug-tracker/www/bug-add.tcl	11 Jul 2002 08:28:20 -0000	1.2
+++ openacs-4/packages/bug-tracker/www/bug-add.tcl	28 Aug 2002 15:44:18 -0000	1.3
@@ -21,7 +21,7 @@
 ad_maybe_redirect_for_registration
 
 # Set some common bug-tracker variables
-set project_name [bt_conn project_name]
+set project_name [bug_tracker::conn project_name]
 set package_id [ad_conn package_id]
 set package_key [ad_conn package_key]
 
@@ -44,13 +44,13 @@
         -datatype integer \
         -widget select \
         -label "Component" \
-        -options [bt_components_get_options]
+        -options [bug_tracker::components_get_options]
 
 element create bug bug_type \
         -datatype text \
         -widget select \
         -label "Type of bug" \
-        -options [bt_bug_type_get_options] \
+        -options [bug_tracker::bug_type_get_options] \
         -optional
 
 element create bug summary  \
@@ -62,21 +62,21 @@
         -datatype integer \
         -widget select \
         -label "Severity" \
-        -options [bt_severity_codes_get_options] \
+        -options [bug_tracker::severity_codes_get_options] \
         -optional
 
 element create bug priority \
         -datatype integer \
         -widget select \
         -label "Priority" \
-        -options [bt_priority_codes_get_options] \
+        -options [bug_tracker::priority_codes_get_options] \
         -optional
 
 element create bug found_in_version \
         -datatype integer \
         -widget select \
         -label "Version" \
-        -options [bt_version_get_options -include_unknown] \
+        -options [bug_tracker::version_get_options -include_unknown] \
         -optional
 
 element create bug description  \
@@ -105,8 +105,8 @@
     element set_properties bug found_in_version \
             -value [db_string user_version { select user_version from bt_user_prefs where user_id = :user_id and project_id = :package_id }]
     
-    element set_properties bug severity -value [bt_severity_get_default]
-    element set_properties bug priority -value [bt_priority_get_default]
+    element set_properties bug severity -value [bug_tracker::severity_get_default]
+    element set_properties bug priority -value [bug_tracker::priority_get_default]
 
     element set_properties bug desc_format -value "plain"
 
@@ -150,7 +150,7 @@
 
     }
     
-    bt_bug_notify $bug_id "open" $description $desc_format
+    bug_tracker::bug_notify $bug_id "open" $description $desc_format
 
     ad_returnredirect $return_url
     ad_script_abort