loncom/interface/loncoursedata.pm - diff

Return to loncoursedata.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.82, 2003/08/07 14:29:43	version 1.84, 2003/08/21 21:03:38
Line 104 sub get_sequence_assessment_data {	Line 104 sub get_sequence_assessment_data {
my $fn=$ENV{'request.course.fn'};	my $fn=$ENV{'request.course.fn'};
##	##
## use navmaps	## use navmaps
my $navmap = Apache::lonnavmaps::navmap->new(1,0);	my $navmap = Apache::lonnavmaps::navmap->new();
if (!defined($navmap)) {	if (!defined($navmap)) {
return 'Can not open Coursemap';	return 'Can not open Coursemap';
}	}
Line 158 sub get_sequence_assessment_data {	Line 158 sub get_sequence_assessment_data {
}	}
# get the map itself, instead of BEGIN_MAP	# get the map itself, instead of BEGIN_MAP
$title = $previous->title();	$title = $previous->title();
	$title =~ s/\&colon;/\&\#058;/g;
$symb = $previous->symb();	$symb = $previous->symb();
$src = $previous->src();	$src = $previous->src();
# pick up the filename if there is no title available	# pick up the filename if there is no title available
Line 186 sub get_sequence_assessment_data {	Line 187 sub get_sequence_assessment_data {
next if (! $curRes->is_problem());# && !$curRes->randomout);	next if (! $curRes->is_problem());# && !$curRes->randomout);
# Okay, from here on out we only deal with assessments	# Okay, from here on out we only deal with assessments
$title = $curRes->title();	$title = $curRes->title();
	$title =~ s/\&colon;/\&\#058;/g;
$symb = $curRes->symb();	$symb = $curRes->symb();
$src = $curRes->src();	$src = $curRes->src();
my $parts = $curRes->parts();	my $parts = $curRes->parts();