From a820cfffc9f5413be79409c915565689563dede3 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 26 Jan 2002 01:52:31 +0000 Subject: [PATCH] another bug spotted by jeff --- FS/FS/cust_credit_refund.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/cust_credit_refund.pm b/FS/FS/cust_credit_refund.pm index 7079d28e9..cc3b32cdb 100644 --- a/FS/FS/cust_credit_refund.pm +++ b/FS/FS/cust_credit_refund.pm @@ -176,7 +176,7 @@ Returns the credit (see L) =cut -sub cust_refund { +sub cust_credit { my $self = shift; qsearchs( 'cust_credit', { 'crednum' => $self->crednum } ); } @@ -185,7 +185,7 @@ sub cust_refund { =head1 VERSION -$Id: cust_credit_refund.pm,v 1.8 2002-01-24 16:58:47 ivan Exp $ +$Id: cust_credit_refund.pm,v 1.9 2002-01-26 01:52:31 ivan Exp $ =head1 BUGS -- 2.11.0