/[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.5 by wakaba, Sat Aug 3 23:32:04 2002 UTC revision 1.6 by wakaba, Mon Aug 5 09:33:18 2002 UTC
# Line 87  sub parse ($$;%) { Line 87  sub parse ($$;%) {
87      = $self->Message::Util::delete_comment_to_array ($body)      = $self->Message::Util::delete_comment_to_array ($body)
88      if $self->{option}->{use_comment};      if $self->{option}->{use_comment};
89    my @d;    my @d;
90    $body =~ s{ : ([0-9]+) $ }{    $body =~ s{ $REG{FWS} : $REG{FWS} ([0-9]+) $ $REG{FWS} }{
91      $self->{port} = $1;      $self->{port} = $1;
92    ''}ex if $self->{option}->{use_port};    ''}ex if $self->{option}->{use_port};
93    $body =~ s{($REG{domain_literal}|[^\x5B\x2E])+}{    $body =~ s{($REG{domain_literal}|[^\x5B\x2E])+}{
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24