Comment out the debug code in the DESTROY handler

This commit is contained in:
ian%hixie.ch 2003-03-27 19:52:23 +00:00
Родитель 60b91e09b5
Коммит 86ce78147a
1 изменённых файлов: 9 добавлений и 9 удалений

Просмотреть файл

@ -254,15 +254,15 @@ sub dispatchMethod {
$self->getSelectingObjectList($service)->dispatch($self, "$prefix\u$method", @arguments)); $self->getSelectingObjectList($service)->dispatch($self, "$prefix\u$method", @arguments));
} }
sub DESTROY { # sub DESTROY {
my $self = shift; # my $self = shift;
$self->dump(10, 'At controller shutdown, there were ' . # $self->dump(10, 'At controller shutdown, there were ' .
# I assume there will always be > 1 and so haven't bothered to special case the singular grammar # # I assume there will always be > 1 and so haven't bothered to special case the singular grammar
scalar(@{$self->{services}}) . # scalar(@{$self->{services}}) .
' services registered, of which ' . # ' services registered, of which ' .
scalar(keys(%{$self->{servicesHash}})) . # scalar(keys(%{$self->{servicesHash}})) .
' had been placed in the services hash.'); # ' had been placed in the services hash.');
} # }
# Implementation Specific Methods # Implementation Specific Methods