Parent Directory | Revision Log | Patch
revision 1.4 by jlenton, Mon Apr 14 22:31:39 2003 UTC | revision 1.5 by fheinz, Tue Apr 15 12:30:51 2003 UTC | |
---|---|---|
# | Line 3 use strict; | Line 3 use strict; |
3 | use Carp; | use Carp; |
4 | use English; | use English; |
5 | use XML::Parser; | use XML::Parser; |
6 | use neb::LayoutParser; | use neb::Parser; |
7 | ||
8 | sub new | sub new |
9 | { | { |
# | Line 61 sub parse | Line 61 sub parse |
61 | # if defined $text; | # if defined $text; |
62 | if (defined $text) | if (defined $text) |
63 | { | { |
64 | my $p = new XML::Parser(Style => 'neb::LayoutParser'); | my $p = new XML::Parser(Style => 'neb::Parser'); |
65 | $self->{PARSE} = $p->parse($text, 'neb_root_name' => $self->root); | $self->{PARSE} = $p->parse($text, 'neb_root_name' => $self->root); |
66 | } | } |
67 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |