Return to lonnavmaps.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.337, 2005/09/20 07:52:03 | version 1.338, 2005/09/23 21:30:25 |
---|---|
Line 4144 sub extractParts { | Line 4144 sub extractParts { |
} | } |
foreach (split(/\,/,$metadata)) { | foreach (split(/\,/,$metadata)) { |
if ($_ =~ /^(?:part|Task)_(.*)$/) { | if ($_ =~ /^(?:part|Task)_(.*)$/) { |
&Apache::lonnet::logthis($self->src()." part -> ".$1); | |
my $part = $1; | my $part = $1; |
# This floods the logs if it blows up | # This floods the logs if it blows up |
if (defined($parts{$part})) { | if (defined($parts{$part})) { |