X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_pay.pm;h=80d4a140bf0b962918ed828fc7e239e8f8e03588;hp=1ceb599a07163411792260d8c8b40991fe698c3d;hb=b5fbaadb1cb2893660e460a1d4a3cabe02774de7;hpb=40c89f3fd0933be14693b918e045bc21d39d6f01 diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm index 1ceb599a0..80d4a140b 100644 --- a/FS/FS/cust_pay.pm +++ b/FS/FS/cust_pay.pm @@ -357,7 +357,7 @@ sub check { $self->_date(time) unless $self->_date; - $self->payby =~ /^(CARD|CHEK|LECB|BILL|COMP)$/ or return "Illegal payby"; + $self->payby =~ /^(CARD|CHEK|LECB|BILL|COMP|PREP)$/ or return "Illegal payby"; $self->payby($1); #false laziness with cust_refund::check