- Changes for invoicing article

tcl/intranet-invoices-procs.tcl

@@ -513,12 +513,14 @@ ad_proc im_invoices_object_list_component { user_id invoice_id read write return
         <tr>
           <td align=left colspan=2>
 	    <select name=action>
-	    <option value='set_invoiced'>[lang::message::lookup "" intranet-invoices.Set_to_invoiced "Set to invoiced"]</option>
-	    <option value='delete'>[_ intranet-core.Delete]</option>
-	    <option value='add_project'>[_ intranet-invoices.Add_a_Project]</option>
-            <input type=submit value='[_ intranet-core.Apply]'>
+	    <option value=\"set_invoiced\">[lang::message::lookup "" intranet-invoices.Set_to_invoiced "Set to invoiced"]</option>
+	    <option value=\"delete\">[_ intranet-core.Delete]</option>
+	    <option value=\"add_project\">[_ intranet-invoices.Add_a_Project]</option>
+	    </select>
+            <input type=submit value=\"[_ intranet-core.Apply]\">
           </td>
-        </tr>\n"
+        </tr>
+        "
     }
     append return_html "
       </table>

www/view.tcl

@@ -1196,7 +1196,7 @@ append subtotal_item_html "
 
 set payment_terms_html "
         <tr>
-	  <td valign=top class=rowplain>[lang::message::lookup $locale intranet-invoices.Payment_Terms]</td>
+	  <td valign=top class=rowplain>[lang::message::lookup $locale intranet-invoices.Payment_Terms]:</td>
           <td valign=top colspan=[expr {$colspan-1}] class=rowplain>
             [lang::message::lookup $locale intranet-invoices.lt_This_invoice_is_past_]
           </td>
@@ -1205,7 +1205,7 @@ set payment_terms_html "
 
 set payment_method_html "
         <tr>
-	  <td valign=top class=rowplain>[lang::message::lookup $locale intranet-invoices.Payment_Method_1]</td>
+	  <td valign=top class=rowplain>[lang::message::lookup $locale intranet-invoices.Payment_Method_1]:</td>
           <td valign=top colspan=[expr {$colspan-1}] class=rowplain> $invoice_payment_method_desc</td>
         </tr>
 "