X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=EZLocate.pm;fp=EZLocate.pm;h=09062f5c185996bc203371361ad71a3e85988efd;hb=3496d00e963072b6e571166e9a079f0d04153e9a;hp=3215dc376bf0300dd87c33941f5b05d7c3719ec8;hpb=c835b19b36a697cfbaf29e2841b0ee26cce83782;p=Geo-EZLocate.git

diff --git a/EZLocate.pm b/EZLocate.pm
index 3215dc3..09062f5 100644
--- a/EZLocate.pm
+++ b/EZLocate.pm
@@ -76,7 +76,7 @@ sub login {
     $bits >>= 24;
     $key = ($key ^ $bits);
   }
-  $key = $key & 0x3fffffff;
+  $key = $key & 0x0fffffff;
 
   my $client = $self->{'auth'} ||= $Auth->new;
   my $r_requestChallenge = $client->requestChallenge({
@@ -168,7 +168,8 @@ You can find documentation for this module with the perldoc command.
 
     perldoc Geo::EZLocate
 
-This library is not supported by TomTom.
+This library is not supported by TomTom.  Commercial support is available
+from Freeside Internet Services, L<http://www.freeside.biz>.
 
 =head1 LICENSE AND COPYRIGHT
 
@@ -180,7 +181,6 @@ by the Free Software Foundation; or the Artistic License.
 
 See http://dev.perl.org/licenses/ for more information.
 
-
 =cut
 
 1; # End of Geo::EZLocate