Parent Directory | Revision Log | Patch
revision 1.1 by wakaba, Sat Mar 16 01:26:31 2002 UTC | revision 1.2 by wakaba, Wed Mar 20 09:56:26 2002 UTC | |
---|---|---|
# | Line 35 Return empty Message::Field::Structured | Line 35 Return empty Message::Field::Structured |
35 | ||
36 | =cut | =cut |
37 | ||
38 | sub new ($) { | sub new ($;%) { |
39 | bless {}, shift; | bless {}, shift; |
40 | } | } |
41 | ||
# | Line 45 Parse structured C<field-body>. | Line 45 Parse structured C<field-body>. |
45 | ||
46 | =cut | =cut |
47 | ||
48 | sub parse ($$) { | sub parse ($$;%) { |
49 | my $self = bless {}, shift; | my $self = bless {}, shift; |
50 | my $field_body = shift; | my $field_body = shift; |
51 | $self->{field_body} = $field_body; | $self->{field_body} = $field_body; |
|
admin@suikawiki.org | ViewVC Help |
Powered by ViewVC 1.1.24 |