freeside/httemplate/edit/process part_bill_event.cgi,1.5,1.5.4.1

[ivan]

Update of /home/cvs/cvsroot/freeside/httemplate/edit/process
In directory pouncequick:/tmp/cvs-serv23947/httemplate/edit/process

Modified Files:
      Tag: FREESIDE_1_4_BRANCH
	part_bill_event.cgi 
Log Message:
add per-agent invoice templates, add per-package suspend invoice events, fix automatic creation of invoice_latex alternate templates

Index: part_bill_event.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/process/part_bill_event.cgi,v
retrieving revision 1.5
retrieving revision 1.5.4.1
diff -u -d -r1.5 -r1.5.4.1
--- part_bill_event.cgi	30 Aug 2002 23:42:47 -0000	1.5
+++ part_bill_event.cgi	14 May 2004 12:25:48 -0000	1.5.4.1
@@ -5,7 +5,7 @@
 my $old = qsearchs('part_bill_event',{'eventpart'=>$eventpart}) if $eventpart;
 
 #s/days/seconds/
-$cgi->param('seconds', $cgi->param('days') * 86400 );
+$cgi->param('seconds', int( $cgi->param('days') * 86400 ) );
 
 my $error;
 if ( ! $cgi->param('plan_weight_eventcode') ) {
@@ -21,7 +21,8 @@
   my $plandata = '';
   while ( $eventcode =~ /%%%(\w+)%%%/ ) {
     my $field = $1;
-    my $value = $cgi->param($field);
+    my $value = join(', ', $cgi->param($field) );
+    $cgi->param($field, $value); #in case it errors out
     $eventcode =~ s/%%%$field%%%/$value/;
     $plandata .= "$field $value\n";
   }