loncom/interface/spreadsheet/studentcalc.pm - diff

Return to studentcalc.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.39, 2006/05/01 06:17:16	version 1.40, 2006/05/30 12:46:26
Line 59 use Apache::assesscalc();	Line 59 use Apache::assesscalc();
use HTML::Entities();	use HTML::Entities();
use Time::HiRes;	use Time::HiRes;
use Apache::lonlocal;	use Apache::lonlocal;
	use lib '/home/httpd/lib/perl/';
	use LONCAPA;


@Apache::studentcalc::ISA = ('Apache::Spreadsheet');	@Apache::studentcalc::ISA = ('Apache::Spreadsheet');

Line 292 END	Line 295 END
'<a href="/adm/assesscalc?sname='.$self->{'name'}.	'<a href="/adm/assesscalc?sname='.$self->{'name'}.
'&sdomain='.$self->{'domain'}.	'&sdomain='.$self->{'domain'}.
'&filename='.$assess_filename.	'&filename='.$assess_filename.
'&usymb='.&Apache::lonnet::escape($resource->symb).	'&usymb='.&escape($resource->symb).
'">'.$resource->compTitle.'</a><br />';	'">'.$resource->compTitle.'</a><br />';
$row_output .= &assess_file_selector($rownum,	$row_output .= &assess_file_selector($rownum,
$assess_filename,	$assess_filename,
Line 300 END	Line 303 END
'</td>';	'</td>';
} else {	} else {
$row_output .= '<td><a href="'.$resource->src.'?symb='.	$row_output .= '<td><a href="'.$resource->src.'?symb='.
&Apache::lonnet::escape($resource->symb).	&escape($resource->symb).
'">Go To</a>';	'">Go To</a>';
$row_output .= '</td><td>'.$resource->compTitle.'</td>';	$row_output .= '</td><td>'.$resource->compTitle.'</td>';
}	}