loncom/interface/statistics/lonsubmissiontimeanalysis.pm - diff

Return to lonsubmissiontimeanalysis.pm CVS log

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

version 1.23, 2005/04/07 06:56:24	version 1.25, 2006/05/01 19:29:13
Line 80 sub BuildSubmissionTimePage {	Line 80 sub BuildSubmissionTimePage {
#	#
if (! exists($env{'form.problemchoice'}) \|\|	if (! exists($env{'form.problemchoice'}) \|\|
exists($env{'form.SelectAnother'})) {	exists($env{'form.SelectAnother'})) {
$r->print('<input type="submit" name="" value="'.	my $submit_button = '<input type="submit" name="" value="'.
&mt('Graph Problem Submission Times').'" />');	&mt('Graph Problem Submission Times').'" />';
$r->print(' 'x5);	$r->print($submit_button.' 'x5);
$r->print('<h3>'.&mt('Please select a problem to analyze').'</h3>');	$r->print('<h3>'.&mt('Please select a problem to analyze').'</h3>');
$r->print(&Apache::lonstathelpers::problem_selector('.'));	$r->print(&Apache::lonstathelpers::problem_selector('.',
	$submit_button));
} else {	} else {
foreach my $button (@SubmitButtons) {	foreach my $button (@SubmitButtons) {
$r->print('<input type="submit" name="'.$button->{'name'}.'" '.	$r->print('<input type="submit" name="'.$button->{'name'}.'" '.
Line 394 sub CreateInterface {	Line 395 sub CreateInterface {
##	##
## Build the menu	## Build the menu
my $Str = '';	my $Str = '';
$Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,'Submission Time Plots');	$Str .= &Apache::lonhtmlcommon::breadcrumbs('Submission Time Plots');
$Str .= '<p>';	$Str .= '<p>';
$Str .= '<table cellspacing="5">'."\n";	$Str .= '<table cellspacing="5">'."\n";
$Str .= '<tr>';	$Str .= '<tr>';