summaryrefslogtreecommitdiff
path: root/httemplate/edit/process/part_bill_event.cgi
diff options
context:
space:
mode:
authorivan <ivan>2004-05-14 12:25:45 +0000
committerivan <ivan>2004-05-14 12:25:45 +0000
commite975ed0585280f4cbb90b02f57114dedc43f58be (patch)
tree907d80f711853116ce390a5d3306b52f7c7084fd /httemplate/edit/process/part_bill_event.cgi
parentaa2daf29c5bb13a3728b434159afc4065367af91 (diff)
add per-agent invoice templates, add per-package suspend invoice events, fix automatic creation of invoice_latex alternate templates
Diffstat (limited to 'httemplate/edit/process/part_bill_event.cgi')
-rwxr-xr-xhttemplate/edit/process/part_bill_event.cgi5
1 files changed, 3 insertions, 2 deletions
diff --git a/httemplate/edit/process/part_bill_event.cgi b/httemplate/edit/process/part_bill_event.cgi
index e224bf634..77dcd242a 100755
--- a/httemplate/edit/process/part_bill_event.cgi
+++ b/httemplate/edit/process/part_bill_event.cgi
@@ -5,7 +5,7 @@ my $eventpart = $cgi->param('eventpart');
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 @@ if ( ! $cgi->param('plan_weight_eventcode') ) {
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";
}