projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
adding postfix export
[freeside.git]
/
FS
/
FS
/
cust_main.pm
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
3e40cc1
..
6ca3287
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-880,7
+880,7
@@
sub check {
if !$import && ( $y<$nowy || ( $y==$nowy && $1<$nowm ) );
}
if !$import && ( $y<$nowy || ( $y==$nowy && $1<$nowm ) );
}
- if ( $self->payname eq '' && $self->payby
ne 'CHEK'
&&
+ if ( $self->payname eq '' && $self->payby
!~ /^(CHEK|DCHK)$/
&&
( ! $conf->exists('require_cardname')
|| $self->payby !~ /^(CARD|DCRD)$/ )
) {
( ! $conf->exists('require_cardname')
|| $self->payby !~ /^(CARD|DCRD)$/ )
) {
@@
-1016,7
+1016,7
@@
Always returns a list: an empty list on success or a list of errors.
sub cancel {
my $self = shift;
sub cancel {
my $self = shift;
- grep { $_->cancel(@_) } $self->ncancelled_pkgs;
+ grep { $_
} map { $_
->cancel(@_) } $self->ncancelled_pkgs;
}
=item agent
}
=item agent