projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
7fc18b4
)
fix unsuspendauto
author
ivan
<ivan>
Tue, 4 Jun 2002 14:35:52 +0000
(14:35 +0000)
committer
ivan
<ivan>
Tue, 4 Jun 2002 14:35:52 +0000
(14:35 +0000)
FS/FS/cust_credit.pm
patch
|
blob
|
history
FS/FS/cust_pay.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_credit.pm
b/FS/FS/cust_credit.pm
index
0ce5ac6
..
284d59d
100644
(file)
--- a/
FS/FS/cust_credit.pm
+++ b/
FS/FS/cust_credit.pm
@@
-104,8
+104,6
@@
sub insert {
return "error inserting $self: $error";
}
return "error inserting $self: $error";
}
- $dbh->commit or die $dbh->errstr if $oldAutoCommit;
-
#false laziness w/ cust_credit::insert
if ( $unsuspendauto && $old_balance && $cust_main->balance <= 0 ) {
my @errors = $cust_main->unsuspend;
#false laziness w/ cust_credit::insert
if ( $unsuspendauto && $old_balance && $cust_main->balance <= 0 ) {
my @errors = $cust_main->unsuspend;
@@
-117,6
+115,8
@@
sub insert {
}
#eslaf
}
#eslaf
+ $dbh->commit or die $dbh->errstr if $oldAutoCommit;
+
'';
}
'';
}
@@
-242,7
+242,7
@@
sub credited {
=head1 VERSION
=head1 VERSION
-$Id: cust_credit.pm,v 1.1
5 2002-01-28 06:57:23
ivan Exp $
+$Id: cust_credit.pm,v 1.1
6 2002-06-04 14:35:52
ivan Exp $
=head1 BUGS
=head1 BUGS
diff --git
a/FS/FS/cust_pay.pm
b/FS/FS/cust_pay.pm
index
fcd902b
..
98eba70
100644
(file)
--- a/
FS/FS/cust_pay.pm
+++ b/
FS/FS/cust_pay.pm
@@
-152,8
+152,6
@@
sub insert {
}
}
}
}
- $dbh->commit or die $dbh->errstr if $oldAutoCommit;
-
#false laziness w/ cust_credit::insert
if ( $unsuspendauto && $old_balance && $cust_main->balance <= 0 ) {
my @errors = $cust_main->unsuspend;
#false laziness w/ cust_credit::insert
if ( $unsuspendauto && $old_balance && $cust_main->balance <= 0 ) {
my @errors = $cust_main->unsuspend;
@@
-165,6
+163,8
@@
sub insert {
}
#eslaf
}
#eslaf
+ $dbh->commit or die $dbh->errstr if $oldAutoCommit;
+
'';
}
'';
}
@@
-405,7
+405,7
@@
sub unapplied {
=head1 VERSION
=head1 VERSION
-$Id: cust_pay.pm,v 1.2
0 2002-05-18 09:51:30
ivan Exp $
+$Id: cust_pay.pm,v 1.2
1 2002-06-04 14:35:52
ivan Exp $
=head1 BUGS
=head1 BUGS