diff options
| author | ivan <ivan> | 2009-06-10 00:02:27 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2009-06-10 00:02:27 +0000 |
| commit | 2bf4bd2401c76ad784fe2abfa87bb8bacb7b01d2 (patch) | |
| tree | 634dfcf42113f3a6a37e41fcf360fb0f501c6f6d /FS | |
| parent | 93a56633fe031852ce031ad2663f31c43c0eccd4 (diff) | |
eliminate harmless
Argument "" isn't numeric in numeric comparison (<=>) at /usr/local/share/perl/5.8.8/FS/cust_main.pm line 6759.
warning, sort batched payments on a column that actually exists
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_main.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 72b84504f..124cbccca 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -6756,7 +6756,7 @@ Returns all batched payments (see L<FS::cust_pay_void>) for this customer. sub cust_pay_batch { my $self = shift; - sort { $a->_date <=> $b->_date } + sort { $a->paybatchnum <=> $b->paybatchnum } qsearch( 'cust_pay_batch', { 'custnum' => $self->custnum } ) } |