Skip to content
Snippets Groups Projects
Commit 289bfd1e authored by Mark Harrison's avatar Mark Harrison
Browse files

Removing debug print statements

git-svn-id: https://labs.omniti.com/resmon/trunk@110 8c0face9-b7db-6ec6-c4b3-d5f7145c7d55
parent a3ac1576
No related branches found
No related tags found
No related merge requests found
...@@ -430,10 +430,10 @@ sub purge { ...@@ -430,10 +430,10 @@ sub purge {
while (my ($type, $value) = each (%{$self->{store}})) { while (my ($type, $value) = each (%{$self->{store}})) {
while (my ($name, $value2) = each (%$value)) { while (my ($name, $value2) = each (%$value)) {
if (!exists($loaded{$type}) || !exists($loaded{$type}{$name})) { if (!exists($loaded{$type}) || !exists($loaded{$type}{$name})) {
print STDERR "$type $name\n"; #print STDERR "$type $name\n";
delete $self->{store}->{$type}->{$name}; delete $self->{store}->{$type}->{$name};
if (scalar(keys %{$self->{store}->{$type}}) == 0) { if (scalar(keys %{$self->{store}->{$type}}) == 0) {
print STDERR "$type has no more objects, deleting\n"; #print STDERR "$type has no more objects, deleting\n";
delete $self->{store}->{$type}; delete $self->{store}->{$type};
} }
} }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment