version 1.166, 2003/03/23 07:12:41
|
version 1.167, 2003/03/25 22:35:58
|
Line 118 sub cleanup {
|
Line 118 sub cleanup {
|
# original hash and the tied hash must be untied. Bleh. |
# original hash and the tied hash must be untied. Bleh. |
for my $ref (@refsToUntie) { |
for my $ref (@refsToUntie) { |
&Apache::lonnet::logthis('Cleanup navmaps: reference'); |
&Apache::lonnet::logthis('Cleanup navmaps: reference'); |
unless (untie($ref)) { |
unless (untie(%$ref)) { |
&Apache::lonnet::logthis('Failed cleanup navmaps: reference'); |
&Apache::lonnet::logthis('Failed cleanup navmaps: reference'); |
} |
} |
} |
} |