Index: /trunk/cgi-bin/CustIDCK.pm
===================================================================
--- /trunk/cgi-bin/CustIDCK.pm	(revision 638)
+++ /trunk/cgi-bin/CustIDCK.pm	(revision 639)
@@ -34,7 +34,12 @@
   my $custid = shift;
 
+  # Arguably this is wrong, but spaces don't really show up well on printed material...
+  $custid =~ s/^\s+//;
+  $custid =~ s/\s+$//;
+
   # hardcoded "OK" custids.
   return 1 if $custid =~ /^STAFF(?:-\d\d?)?$/;
   return 1 if $custid =~ /^5554242(?:-\d\d?)?$/;  # just in case some later change might block this
+  return 1 if $custid =~ /^\d{6}(?:-\d\d?)?$/;
   return 1 if $custid =~ /^\d{7}(?:-\d\d?)?$/;
   return 1 if $custid =~ /^\d{10}(?:-\d\d?)?$/;