Index: openacs-4/packages/invoices/www/invoice-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoice-ae.tcl,v
diff -u -N -r1.34 -r1.35
--- openacs-4/packages/invoices/www/invoice-ae.tcl	18 Jun 2006 11:42:26 -0000	1.34
+++ openacs-4/packages/invoices/www/invoice-ae.tcl	4 Aug 2006 15:36:38 -0000	1.35
@@ -458,7 +458,12 @@
     set copy_p 0
     set email_p j
 
-    set description [lang::util::localize [join [db_list project_titles {}] ",\n"]]
+    if {[exists_and_not_null project_id]} {
+	set description [lang::util::localize [join [db_list project_titles {}] ",\n"]]
+    } else {
+	set description ""
+    }
+
     set due_date [db_string today {}]
     set title "[_ invoices.iv_invoice_1] $organization_name $due_date"