XML::XBEL::thingy - private methods for XBEL thingies.

XML-XBEL documentation

Contained in the XML-XBEL distribution.

Index

NAME
SYNOPSIS
DESCRIPTION
VERSION
DATE
AUTHOR
SEE ALSO
LICENSE

Code Index:

package XML::XBEL::thingy
- delete
- build_node
EOF

NAME

XML::XBEL::thingy - private methods for XBEL thingies.

SYNOPSIS

 None.

DESCRIPTION

Private methods for XBEL thingies.

VERSION

$Revision: 1.2 $

DATE

$Date: 2004/06/23 06:23:57 $

AUTHOR

Aaron Straup Cope <ascope@cpan.org>

SEE ALSO

<XML::XBEL>

LICENSE

Copyright (c) 2004 Aaron Straup Cope. All Rights Reserved.

This is free software, you may use it and distribute it under the same terms as Perl itself.

XML-XBEL documentation

Contained in the XML-XBEL distribution.

use strict;
package XML::XBEL::thingy;

# $Id: thingy.pm,v 1.2 2004/06/23 06:23:57 asc Exp $

sub delete {
    my $self = shift;

    my $parent = $self->{'__root'}->parentNode();
    $parent->removeChild($self->{'__root'});

    undef $self;
}

sub build_node {
    my $pkg = shift;
    my $node = shift;

    return bless {'__root' => $node}, $pkg;
}

return 1;