modules/gci/londocsgci.pm - diff

Return to londocsgci.pm CVS log

Up to [LON-CAPA] / modules / gci

version 1.3, 2009/11/27 23:48:25	version 1.4, 2009/12/02 18:35:59
Line 164 sub editor {	Line 164 sub editor {
foreach my $item (@chosen) {	foreach my $item (@chosen) {
$chosen{$item}=1;	$chosen{$item}=1;
}	}
	&Apache::lonnet::appenv({'request.gcicontext' => 'buildtest'});
$r->print('<form name="selecteditems" method="post" action="/adm/coursedocs">');	$r->print('<form name="selecteditems" method="post" action="/adm/coursedocs">');
$r->print('<p>'.&mt('You may select test items from the list below and then press "Store Problem Selection" at the bottom of the screen.').'</p>');	$r->print('<p>'.&mt('You may select test items from the list below and then press "Store Problem Selection" at the bottom of the screen.').'</p>');
$r->print('<p>'.&mt('Tests should have at least one item from each bin and [_1] items total.',$reqnum).'</p>');	$r->print('<p>'.&mt('Tests should have at least one item from each bin and [_1] items total.',$reqnum).'</p>');
Line 190 sub editor {	Line 191 sub editor {
$r->print(&Apache::loncommon::end_data_table());	$r->print(&Apache::loncommon::end_data_table());
$r->print('<input type="hidden" name="phase" value="storemap" />');	$r->print('<input type="hidden" name="phase" value="storemap" />');
$r->print('<input type="submit" value="'.&mt('Store Problem Selection').'" /></form>');	$r->print('<input type="submit" value="'.&mt('Store Problem Selection').'" /></form>');
	&Apache::lonnet::delenv('request.gcicontext');
}	}

sub evaluate {	sub evaluate {