- Fixed New Invoice from Timesheet Tasks

3a26bc99 · Frank Bergmann · 51a7a4b0 · 3a26bc99
Commit 3a26bc99 authored Jan 24, 2013 by Frank Bergmann
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

new-4.tcl www/invoices/new-4.tcl +2 -1

No files found.
--- a/www/invoices/new-4.tcl
+++ b/www/invoices/new-4.tcl
@@ -68,13 +68,14 @@ if {!$write_p} {

 # Look for common super-projects for multi-project documents
 set select_project [im_invoices_unify_select_projects $select_project]
+regsub "\{" $select_project {} select_project
+regsub "\}" $select_project {} select_project

 set project_id ""
 if {1 == [llength $select_project]} {
    set project_id [lindex $select_project 0]
 }

-
 # ---------------------------------------------------------------
 # Determine and check invoice currency
 # ---------------------------------------------------------------