version 1.29, 2009/09/04 16:12:09
|
version 1.30, 2014/01/17 17:10:12
|
Line 125 ENDJS
|
Line 125 ENDJS
|
); |
); |
return OK; |
return OK; |
} else { |
} else { |
$warning=&mt('Please fill out all fields below.'); |
$warning=&mt('Please fill out all required fields below!'); |
} |
} |
|
|
} |
} |
Line 173 ENDOPTIONS
|
Line 173 ENDOPTIONS
|
|
|
%lt=&Apache::lonlocal::texthash( |
%lt=&Apache::lonlocal::texthash( |
'pleaserank' => 'Please rank the following criteria:', |
'pleaserank' => 'Please rank the following criteria:', |
|
'required' => '(All fields marked with * are required.)', |
'correct' => 'The material appears to be correct', |
'correct' => 'The material appears to be correct', |
'helpful' => 'The material is helpful', |
'helpful' => 'The material is helpful', |
'depth' => 'The material is covered with sufficient depth', |
'depth' => 'The material is covered with sufficient depth', |
Line 183 ENDOPTIONS
|
Line 184 ENDOPTIONS
|
); |
); |
$r->print( |
$r->print( |
$start_page |
$start_page |
.'<h2>'.$title.'</h2>' |
.'<h2>'.$title.'</h2>'); |
.'<p class="LC_warning">'.$warning.'</p>' |
|
.'<form method="post" name="evaluation" action="/adm/evaluate">' |
if ($warning) { |
|
$r->print( |
|
&Apache::loncommon::confirmwrapper( |
|
&Apache::lonhtmlcommon::confirm_success( |
|
$warning,1))); |
|
} |
|
$r->print( |
|
'<form method="post" name="evaluation" action="/adm/evaluate">' |
.'<input type="hidden" name="submiteval" value="true" />' |
.'<input type="hidden" name="submiteval" value="true" />' |
.'<input type="hidden" name="postdata" value="'.$showurl.'" />' |
.'<input type="hidden" name="postdata" value="'.$showurl.'" />' |
); |
); |
$r->print( |
$r->print( |
&Apache::lonhtmlcommon::start_pick_box() |
&Apache::lonhtmlcommon::start_pick_box() |
.&Apache::lonhtmlcommon::row_headline() |
.&Apache::lonhtmlcommon::row_headline() |
.$lt{'pleaserank'} |
.$lt{'pleaserank'}.'<br />' |
|
.'<span class="LC_info">'.$lt{'required'}.'</span>' |
.&Apache::lonhtmlcommon::row_closure() |
.&Apache::lonhtmlcommon::row_closure() |
); |
); |
|
|
foreach my $key ('correct', 'helpful', 'depth', 'clear', 'technical') { |
foreach my $key ('correct', 'helpful', 'depth', 'clear', 'technical') { |
$r->print( |
$r->print( |
&Apache::lonhtmlcommon::row_title($lt{$key}) |
&Apache::lonhtmlcommon::row_title( |
|
'<span title="'.&mt('required').'">'.$lt{$key} |
|
.' <span class="LC_info">*</span></span>') |
.'<select name="'.$key.'">' |
.'<select name="'.$key.'">' |
.$standardoptions |
.$standardoptions |
.'</select>' |
.'</select>' |