Index: openacs-4/packages/invoices/tcl/invoice-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/tcl/invoice-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/invoices/tcl/invoice-procs.tcl 2 Sep 2005 16:10:00 -0000 1.2 +++ openacs-4/packages/invoices/tcl/invoice-procs.tcl 6 Sep 2005 22:59:05 -0000 1.3 @@ -194,15 +194,15 @@ set file_url [parameter::get -parameter MailSendBoxFileP] if {![empty_string_p $file_url]} { - set file [open $file_url] - fconfigure $file -translation binary - set content [read $file] - - # parse template and replace placeholders - eval [template::adp_compile -string $content] - set final_content $__adp_output + set file [open $file_url] + fconfigure $file -translation binary + set content [read $file] + + # parse template and replace placeholders + eval [template::adp_compile -string $content] + set final_content $__adp_output } else { - set final_content "" + set final_content "" } return $final_content