From b6449417b8af1065a6e58f5cab11d63b33cbd2f9 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 17 Jun 2000 21:48:05 +0000 Subject: [PATCH] fix typo in error message --- FS/FS/cust_pay_batch.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/cust_pay_batch.pm b/FS/FS/cust_pay_batch.pm index 7c5c6c404..0576cbefc 100644 --- a/FS/FS/cust_pay_batch.pm +++ b/FS/FS/cust_pay_batch.pm @@ -176,7 +176,7 @@ sub check { or return "Illegal zip: ". $self->zip; $self->zip($1); - $self->country =~ /^(\w\w)$/ or return "Illegal \w\wy"; + $self->country =~ /^(\w\w)$/ or return "Illegal country: ". $self->country; $self->country($1); #check invnum, custnum, ? @@ -188,7 +188,7 @@ sub check { =head1 VERSION -$Id: cust_pay_batch.pm,v 1.1 1999-08-04 09:03:53 ivan Exp $ +$Id: cust_pay_batch.pm,v 1.2 2000-06-17 21:48:05 ivan Exp $ =head1 BUGS -- 2.11.0