summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2008-07-18 22:32:50 +0000
committerivan <ivan>2008-07-18 22:32:50 +0000
commitd71918f4d623dc9936b9be65d2a4f0e6ade756c7 (patch)
treeb067be8bffb7420f5149001f1c939fc00f674b9f
parent600dc42ab67cfa6af49ed1e6546bc25011f55a3e (diff)
random cleanup from 1.9
-rw-r--r--FS/FS/cust_pkg.pm13
1 files changed, 6 insertions, 7 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index 298189f3b..c8d1cfed3 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -283,8 +283,6 @@ suspend is normally updated by the suspend and unsuspend methods.
cancel is normally updated by the cancel method (and also the order subroutine
in some cases).
-Calls
-
=cut
sub replace {
@@ -319,11 +317,12 @@ sub replace {
foreach my $method ( qw(adjourn expire) ) { # How many reasons?
if ($options{'reason'} && $new->$method && $old->$method ne $new->$method) {
- my $error = $new->insert_reason( 'reason' => $options{'reason'},
- 'date' => $new->$method,
- 'action' => $method,
- 'reason_otaker' => $options{'reason_otaker'},
- );
+ my $error = $new->insert_reason(
+ 'reason' => $options{'reason'},
+ 'date' => $new->$method,
+ 'action' => $method,
+ 'reason_otaker' => $options{'reason_otaker'},
+ );
if ( $error ) {
dbh->rollback if $oldAutoCommit;
return "Error inserting cust_pkg_reason: $error";