loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.196, 2003/06/24 20:21:05	version 1.197, 2003/06/24 20:54:06
Line 658 ENDPART	Line 658 ENDPART
my ($username,$userdomain) = split /:/,$person;	my ($username,$userdomain) = split /:/,$person;
my $fullname = &get_name($username,$userdomain);	my $fullname = &get_name($username,$userdomain);

if ($parmhash{'anonimous_quiz'}=~/yes/) {$fullname=' ';} #put here something reasonable for annonimous exams or quiz	if ($parmhash{'anonymous_quiz'}=~/yes/) {$fullname=' ';} #put here something reasonable for anonymous exams or quiz
#goes through all resources, checks if they are available for current student, and produces output	#goes through all resources, checks if they are available for current student, and produces output
foreach my $curresline (@master_seq) {	foreach my $curresline (@master_seq) {
if ($curresline=~ m/\.(problem\|exam\|quiz\|assess\|survey\|form\|library)$/) {	if ($curresline=~ m/\.(problem\|exam\|quiz\|assess\|survey\|form\|library)$/) {