--- loncom/interface/lonprintout.pm 2003/06/24 14:56:16 1.195 +++ loncom/interface/lonprintout.pm 2003/06/24 20:21:05 1.196 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.195 2003/06/24 14:56:16 sakharuk Exp $ +# $Id: lonprintout.pm,v 1.196 2003/06/24 20:21:05 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -657,6 +657,8 @@ ENDPART # my ($usersection,$username,$userdomain) = split /:/,$person; my ($username,$userdomain) = split /:/,$person; my $fullname = &get_name($username,$userdomain); + + if ($parmhash{'anonimous_quiz'}=~/yes/) {$fullname=' ';} #put here something reasonable for annonimous exams or quiz #goes through all resources, checks if they are available for current student, and produces output foreach my $curresline (@master_seq) { if ($curresline=~ m/\.(problem|exam|quiz|assess|survey|form|library)$/) {