Changeset 207

Show
Ignore:
Timestamp:
07/31/01 14:02:01
Author:
miyagawa
Message:

removed -local_rules / -fudge for Email::Valid constructor

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Email-Find/trunk/Changes

    r122 r207  
    11Revision history for Perl extension Email::Find. 
     2 
     30.07  Tue Jul 31 13:58:30 JST 2001 
     4    * Turned off -local_rules and -fudge for Email::Valid constructor.  
    25 
    360.06  Tue Jun 26 19:48:25 JST 2001 
  • Email-Find/trunk/README

    r121 r207  
    8686        there's only so much cleverness you can pack into one library. 
    8787 
    88 AUTHOR 
    89     Copyright 2000, 2001 Michael G Schwern <schwern@pobox.com>. 
     88AUTHORS 
     89    Copyright 2000, 2001 Michael G Schwern <schwern@pobox.com>. All rights 
     90    reserved. 
    9091 
    91     Copyright 2001 Tatsuhiko Miyagawa <miyagawa@bulknews.net>. 
    92  
    93     All rights reserved. 
     92    Current maintainer is Tatsuhiko Miyagawa <miyagawa@bulknews.net>. 
    9493 
    9594THANKS 
  • Email-Find/trunk/lib/Email/Find.pm

    r122 r207  
    4040 
    4141 
    42 my $validator = Email::Valid->new('-fudge'      => 1
     42my $validator = Email::Valid->new('-fudge'      => 0
    4343                                  '-fqdn'       => 1, 
    44                                   '-local_rules' => 1
     44                                  '-local_rules' => 0
    4545                                  '-mxcheck'    => 0, 
    4646                                 ); 
     
    190190=back 
    191191 
    192 =head1 AUTHOR 
     192=head1 AUTHORS 
    193193 
    194194Copyright 2000, 2001 Michael G Schwern <schwern@pobox.com>. 
    195195All rights reserved. 
    196196 
    197 Copyright 2001 Tatsuhiko Miyagawa <miyagawa@bulknews.net>. 
    198 All rights reserved. 
     197Current maintainer is Tatsuhiko Miyagawa <miyagawa@bulknews.net>. 
    199198 
    200199=head1 THANKS 
  • Email-Find/trunk/t/Find.t

    r67 r207  
    11use lib qw(t/lib); 
    2 use Test::More tests => 14
     2use Test::More tests => 17
    33BEGIN { use_ok('Email::Find') } 
    44 
     
    1010              'Eli the Beared <*@qz.to>' => '*@qz.to', 
    1111              '"@"+*@[132.205.7.51]'    => '+*@[132.205.7.51]', 
     12              'somelongusername@aol.com' => 'somelongusername@aol.com', 
    1213             ); 
    1314}