loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.443, 2006/06/19 21:40:29	version 1.445, 2006/06/26 21:53:36
Line 702 sub get_name {	Line 702 sub get_name {
if (!defined($udom)) { $udom=$env{'user.domain'}; }	if (!defined($udom)) { $udom=$env{'user.domain'}; }
my $plainname=&Apache::loncommon::plainname($uname,$udom);	my $plainname=&Apache::loncommon::plainname($uname,$udom);
if ($plainname=~/^\s*$/) { $plainname=$uname.'@'.$udom; }	if ($plainname=~/^\s*$/) { $plainname=$uname.'@'.$udom; }
$plainname=&Apache::lonxml::latex_special_symbols($plainname,'header');	# $plainname=&Apache::lonxml::latex_special_symbols($plainname,'header');
	$plainname = &escape_LaTeX($plainname);
return $plainname;	return $plainname;
}	}

Line 1802 sub print_resources {	Line 1803 sub print_resources {
$namepostfix="\\\\Name: ";	$namepostfix="\\\\Name: ";
$fullname = "CODE - ".$moreenv->{'CODE'};	$fullname = "CODE - ".$moreenv->{'CODE'};
}	}
	# Fullname may have special latex characters that need \ prefixing:
	#
	&Apache::lonnet::logthis("Prior to latex escape: $fullname");
	# $fullname = &escape_LaTeX($fullname);
	&Apache::lonnet::logthis("After escape $fullname");

my $i = 0;	my $i = 0;
#goes through all resources, checks if they are available for	#goes through all resources, checks if they are available for
#current student, and produces output	#current student, and produces output