X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_credit_refund.pm;h=7079d28e94ed4109097a91b07a4c19343703a4b0;hb=243ec8f6a0ef59759f1398967faa561a43b1dff5;hp=83f6e2f7568015c9edf8235185e27435beca3cac;hpb=0d2d5a1fdc65bc8511dcf9727e534e7e5da271f7;p=freeside.git diff --git a/FS/FS/cust_credit_refund.pm b/FS/FS/cust_credit_refund.pm index 83f6e2f75..7079d28e9 100644 --- a/FS/FS/cust_credit_refund.pm +++ b/FS/FS/cust_credit_refund.pm @@ -149,7 +149,7 @@ sub check { ; return $error if $error; - return "amount must be > 0" if $self->amount == 0; + return "amount must be > 0" if $self->amount <= 0; $self->_date(time) unless $self->_date; @@ -185,7 +185,7 @@ sub cust_refund { =head1 VERSION -$Id: cust_credit_refund.pm,v 1.7 2002-01-24 16:54:53 ivan Exp $ +$Id: cust_credit_refund.pm,v 1.8 2002-01-24 16:58:47 ivan Exp $ =head1 BUGS