Changeset 374

Show
Ignore:
Timestamp:
12/16/01 22:14:20
Author:
miyagawa
Message:

i-get.ne.jp

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Mail-Address-MobileJp/trunk/Changes

    r341 r374  
    11Revision history for Perl extension Mail::Address::MobileJp. 
     2 
     30.02  Sun Dec 16 22:13:30 JST 2001 
     4        - Added *.i-get.ne.jp 
    25 
    360.01  Mon Nov 12 11:40:56 2001 
  • Mail-Address-MobileJp/trunk/lib/Mail/Address/MobileJp.pm

    r341 r374  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = '0.01'; 
     5$VERSION = '0.02'; 
    66 
    77BEGIN { 
     
    6767moco\.ne\.jp| 
    6868emcm\.ne\.jp| 
    69 p1\.foomoon\.com 
     69p1\.foomoon\.com| 
     70.*\.i\-get\.ne\.jp  
    7071)$@x; # end of qr@@ 
    7172 
  • Mail-Address-MobileJp/trunk/t/01_mobile.t

    r341 r374  
    11use strict; 
    2 use Test::More tests => 23
     2use Test::More tests => 24
    33 
    44use Mail::Address; 
     
    2424    'foo@bar.mozio.ne.jp', 
    2525    'foo@p1.foomoon.com', 
     26    'foo@x.i-get.ne.jp', 
    2627    Mail::Address->parse('foo <foo@p1.foomoon.com>'), 
    2728);