remove useless DESTROYs

This commit is contained in:
Graham Knop 2010-04-16 19:30:07 -05:00
parent 2b78fe913b
commit 5122518652
23 changed files with 8 additions and 187 deletions

View file

@ -260,19 +260,6 @@ sub delete {
#-------------------------------------------------------------------
=head2 DESTROY ( )
Deconstructor.
=cut
sub DESTROY {
my $self = shift;
undef $self;
}
#-------------------------------------------------------------------
=head2 get ( property )
Returns the value of a property.