Embedix::ECD::Option - an object for OPTION nodes

Embedix-ECD documentation Contained in the Embedix-ECD distribution.

Index

Code Index:

NAME

Top

Embedix::ECD::Option - an object for OPTION nodes

SYNOPSIS

Top

    my $ecd = Embedix::ECD::Option->new();

DESCRIPTION

Top

Embedix::ECD::Option is a subclass of Embedix::ECD for representing OPTION nodes. It differs from its superclass in the following ways.

Differences

it doesn't (yet) except in name

AUTHOR

Top

John BEPPU <beppu@lineo.com>

SEE ALSO

Top

Embedix::ECD(3pm)

Embedix-ECD documentation Contained in the Embedix-ECD distribution. 
package Embedix::ECD::Option;

use strict;
use vars qw(@ISA);

@ISA = qw(Embedix::ECD);

# I imagine different types of ECD nodes may have different attributes.
# I hope I'm right.

#
#_______________________________________
sub toString {
    my $self = shift;
    my $opt  = $self->getFormatOptions(@_);

    return
        "\n".
        $opt->{space} . "<OPTION " . $self->name . ">\n" . 
            $self->attributeToString($opt) .    # for the attributes
            $self->SUPER::toString(@_) .        # for the children
        $opt->{space} . "</OPTION>\n"
}

1;

__END__


# $Id: Option.pm,v 1.2 2001/02/12 20:50:58 beppu Exp $