/[suikacvs]/messaging/manakai/lib/Message/Field/Domain.pm
Suika

Diff of /messaging/manakai/lib/Message/Field/Domain.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by wakaba, Wed May 15 07:29:09 2002 UTC revision 1.3 by wakaba, Thu May 16 11:43:40 2002 UTC
# Line 15  $VERSION=do{my @r=(q$Revision$=~/\d+/g); Line 15  $VERSION=do{my @r=(q$Revision$=~/\d+/g);
15  require Message::Field::Structured;  require Message::Field::Structured;
16  push @ISA, qw(Message::Field::Structured);  push @ISA, qw(Message::Field::Structured);
17    
18  *REG = \%Message::Util::REG;  %REG = %Message::Util::REG;
           
   
19    
20  =head1 CONSTRUCTORS  =head1 CONSTRUCTORS
21    
# Line 53  The following methods construct new obje Line 51  The following methods construct new obje
51    );    );
52  sub _init ($;%) {  sub _init ($;%) {
53    my $self = shift;    my $self = shift;
54    my %options = @_;    my $DEFAULT = Message::Util::make_clone (\%DEFAULT);
55    $self->SUPER::_init (%DEFAULT, %options);    $self->SUPER::_init (%$DEFAULT, @_);
56  }  }
57    
58  =item $addr = Message::Field::Domain->new ([%options])  =item $addr = Message::Field::Domain->new ([%options])

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24