loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.336, 2005/08/02 21:15:51	version 1.337, 2005/09/20 07:52:03
Line 3639 sub is_page {	Line 3639 sub is_page {
sub is_problem {	sub is_problem {
my $self=shift;	my $self=shift;
my $src = $self->src();	my $src = $self->src();
return ($src =~ /\.(problem\|exam\|quiz\|assess\|survey\|form\|library)$/)	return ($src =~ /\.(problem\|exam\|quiz\|assess\|survey\|form\|library\|task)$/)
}	}
sub contains_problem {	sub contains_problem {
my $self=shift;	my $self=shift;
Line 4143 sub extractParts {	Line 4143 sub extractParts {
return;	return;
}	}
foreach (split(/\,/,$metadata)) {	foreach (split(/\,/,$metadata)) {
if ($_ =~ /^part_(.*)$/) {	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})) {