- Added default to db_string

c12f621c · Frank Bergmann · c52a2377 · c12f621c
Commit c12f621c authored Mar 23, 2021 by Frank Bergmann
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

bug-add.tcl www/bug-add.tcl +1 -1

No files found.
--- a/www/bug-add.tcl
+++ b/www/bug-add.tcl
@@ -32,7 +32,7 @@ db_1row maint_project_info "
 "

 # Set some common bug-tracker variables
-set package_key [db_string package_key "select package_key from apm_packages where package_id = :package_id"]
+set package_key [db_string package_key "select package_key from apm_packages where package_id = :package_id" -default ""]
 set workflow_id [bug_tracker::bug::get_instance_workflow_id -package_id $package_id]
 set page_title "New [bug_tracker::conn Bug -package_id $package_id]"
 set context [list $page_title]