X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FRecord.pm;h=92e0baadf176fb89dc74030f073fe178c66cb1f9;hb=38539c1c58d0907beee56c4d16f39bdebc6b03ad;hp=c3d397389a75d76470a2494312c9a1eadcf69d23;hpb=9d963d1e6270bf67f385a4b5fda4e51cdf4e79ed;p=freeside.git

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index c3d397389..92e0baadf 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -3062,6 +3062,13 @@ sub ut_zip {
                 $self->getfield($field);
     $self->setfield($field, "$1 $2");
 
+  } elsif ( $country eq 'AU' ) {
+
+    $self->getfield($field) =~ /^\s*(\d{4})\s*$/
+      or return gettext('illegal_zip'). " $field for country $country: ".
+                $self->getfield($field);
+    $self->setfield($field, $1);
+
   } else {
 
     if ( $self->getfield($field) =~ /^\s*$/