X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Facct_snarf.pm;h=b4e88bfc92703455d926ab809db5c287606f76af;hb=92fa788fb842baab8fa185e159d8effde739bd74;hp=7c51d6945a413445a755658b0f5d82a1ea1fa544;hpb=5bdc87ecf59cfab3f9c6ca0ea1b97a41ed5561c8;p=freeside.git

diff --git a/FS/FS/acct_snarf.pm b/FS/FS/acct_snarf.pm
index 7c51d6945..b4e88bfc9 100644
--- a/FS/FS/acct_snarf.pm
+++ b/FS/FS/acct_snarf.pm
@@ -90,9 +90,9 @@ returns the error, otherwise returns false.
 
 =item check
 
-Checks all fields to make sure this is a valid example.  If there is
-an error, returns the error, otherwise returns false.  Called by the insert
-and replace methods.
+Checks all fields to make sure this is a valid external mail account.  If
+there is an error, returns the error, otherwise returns false.  Called by the
+insert and replace methods.
 
 =cut
 
@@ -103,7 +103,7 @@ sub check {
     || $self->ut_number('svcnum')
     || $self->ut_foreign_key('svcnum', 'svc_acct', 'svcnum')
     || $self->ut_domain('machine')
-    || $self->alphan('protocol')
+    || $self->ut_alphan('protocol')
     || $self->ut_textn('username')
   ;
   return $error if $error;