|
version 1.17, 2003/01/09 22:04:28
|
version 1.18, 2003/01/14 18:47:50
|
|
Line 45 my %hash; # variable to tie to user spec
|
Line 45 my %hash; # variable to tie to user spec
|
| my $iconpath; # variable to be accessible to multiple subroutines |
my $iconpath; # variable to be accessible to multiple subroutines |
| |
|
| sub cleanup { |
sub cleanup { |
| untie(%hash) if (tied(%hash)); |
if (tied(%hash)){ |
| |
&Apache::lonnet::logthis('Cleanup groupsort: hash'); |
| |
unless (untie(%hash)) { |
| |
&Apache::lonnet::logthis('Failed cleanup groupsort: hash'); |
| |
} |
| |
} |
| } |
} |
| |
|
| # ---------------------------------------------------------------- Main Handler |
# ---------------------------------------------------------------- Main Handler |
![[BACK]](/icons/back.gif){kind=icon}
Return to groupsort.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface