X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fdeploy_zone_block.pm;h=757af7e3d7c89379c0a6e7497b3e5031a842990d;hb=292ef074d01bb925e9a466ed771bf2ac418bb44f;hp=58234b9240f81976d67f830cf603fa08009a39c1;hpb=7c370a4579d1ed8b81dba2fb5fae9978b283b49e;p=freeside.git

diff --git a/FS/FS/deploy_zone_block.pm b/FS/FS/deploy_zone_block.pm
index 58234b924..757af7e3d 100644
--- a/FS/FS/deploy_zone_block.pm
+++ b/FS/FS/deploy_zone_block.pm
@@ -111,6 +111,10 @@ sub check {
   ;
   return $error if $error;
 
+  if ($self->get('censusblock') !~ /^(\d{15})$/) {
+    return "Illegal census block number (must be 15 digits)";
+  }
+
   $self->SUPER::check;
 }