diff options
| author | ivan <ivan> | 2002-04-25 10:37:08 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-04-25 10:37:08 +0000 |
| commit | 2a22a4862979750c1886ac8f125043854be47d58 (patch) | |
| tree | 511412e033ce8fb9fdf2529c7b6fb85a3a20021b /httemplate/edit/part_pkg.cgi | |
| parent | a351f58cf394121aa1f72139356567c4785bf47f (diff) | |
free_delayed try #2
Diffstat (limited to 'httemplate/edit/part_pkg.cgi')
| -rwxr-xr-x | httemplate/edit/part_pkg.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi index dea02f1cc..a63fc23fe 100755 --- a/httemplate/edit/part_pkg.cgi +++ b/httemplate/edit/part_pkg.cgi @@ -188,8 +188,8 @@ tie my %plans, 'Tie::IxHash', }, }, 'fieldorder' => [ 'free_days', 'setup_fee', 'recur_fee' ], - 'setup' => 'what.setup_fee.value', - 'recur' => '\'$sdate += 86400 * \' + what.free_days.value + \'; \' + what.recur_fee.value', + 'setup' => '\'my $d = $cust_pkg->bill || $time; $d += 86400 * \' + what.free_days.value + \'; $cust_pkg->bill($d); $cust_pkg_mod_flag=1; \' + what.setup_fee.value', + 'recur' => 'what.recur_fee.value', }, 'prorate' => { |