version 1.12, 2006/03/16 20:09:35
|
version 1.13, 2006/03/16 20:13:06
|
Line 218 sub print_display_option_form {
|
Line 218 sub print_display_option_form {
|
$output .= &Apache::lonhtmlcommon::row_closure(); |
$output .= &Apache::lonhtmlcommon::row_closure(); |
$output .= &Apache::lonhtmlcommon::submit_row($col_width,$tablecolor,&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::submit_row($col_width,$tablecolor,&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= qq( |
$output .= qq(<input type="hidden" name="sortby" value="date" />\n). |
<input type="hidden" name="sortby" value="date" /> |
&end_page(); |
</form> |
|
</body> |
|
</html>); |
|
$r->print($output); |
$r->print($output); |
return; |
return; |
} |
} |
Line 368 ENDSCRIPT
|
Line 365 ENDSCRIPT
|
$output .= qq(<input type="hidden" name="origin" value="$formname" />\n); |
$output .= qq(<input type="hidden" name="origin" value="$formname" />\n); |
$output .= qq(<input type="hidden" name="command" />\n); |
$output .= qq(<input type="hidden" name="command" />\n); |
$output .= qq(<input type="hidden" name="sortby" value="$curr_sortby" />\n); |
$output .= qq(<input type="hidden" name="sortby" value="$curr_sortby" />\n); |
$output .= qq( |
$output .= &end_page(); |
</form> |
|
</body |
|
</html>); |
|
$r->print($output); |
$r->print($output); |
return; |
return; |
} |
} |
Line 465 function setCourseCat(formname) {
|
Line 459 function setCourseCat(formname) {
|
my $output = &start_page(&add_script($jscript).$cb_jscript, |
my $output = &start_page(&add_script($jscript).$cb_jscript, |
$bodytag, 'Choose e-mail audience', $formname); |
$bodytag, 'Choose e-mail audience', $formname); |
|
|
$output .= &Apache::lonhtmlcommon::start_pick_box($table_width); |
$output .= &Apache::lonhtmlcommon::start_pick_box($table_width); |
my @roles = ('ow','cc','in','ta','ep','st','cr'); |
my @roles = ('ow','cc','in','ta','ep','st','cr'); |
my %longtypes = (); |
my %longtypes = (); |
my %authtypes = (); |
my %authtypes = (); |
&form_elements(\%longtypes,\%authtypes); |
&form_elements(\%longtypes,\%authtypes); |
my $descrip = $lt{'buil'}.' |
my $descrip = $lt{'buil'}.' |
<ul> |
<ul> |
<li>'.$lt{'kerb'}.'<br />(e.g., MSU.EDU=msu.edu, MSUE.EDU=msue.msu.edu).</li> |
<li>'.$lt{'kerb'}.'<br />(e.g., MSU.EDU=msu.edu, MSUE.EDU=msue.msu.edu).</li> |
<li>'.$lt{'infs'}.'</li> |
<li>'.$lt{'infs'}.'</li> |
</ul>'."\n"; |
</ul>'."\n"; |
my $submit_text = $lt{'comp'}; |
my $submit_text = $lt{'comp'}; |
my $cmd = 'compose'; |
my $cmd = 'compose'; |
$output .= &Apache::lonhtmlcommon::role_select_row(\@roles,$col_width,$tablecolor,'Roles'); |
$output .= &Apache::lonhtmlcommon::role_select_row(\@roles,$col_width,$tablecolor,'Roles'); |
$output .= &Apache::lonhtmlcommon::course_select_row($col_width,$tablecolor,'Courses',$formname,$totcodes,\@codetitles,\%idlist,\%idlist_titles); |
$output .= &Apache::lonhtmlcommon::course_select_row($col_width,$tablecolor,'Courses',$formname,$totcodes,\@codetitles,\%idlist,\%idlist_titles); |
$output .= &Apache::lonhtmlcommon::status_select_row(\%longtypes,$col_width,$tablecolor,&mt('Access status')); |
$output .= &Apache::lonhtmlcommon::status_select_row(\%longtypes,$col_width,$tablecolor,&mt('Access status')); |
$output .= &Apache::lonhtmlcommon::email_default_row(\%authtypes,$col_width,$tablecolor,&mt('Username -> Email conversion'),$descrip); |
$output .= &Apache::lonhtmlcommon::email_default_row(\%authtypes,$col_width,$tablecolor,&mt('Username -> Email conversion'),$descrip); |
$output .= &Apache::lonhtmlcommon::submit_row($col_width,$tablecolor,&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::submit_row($col_width,$tablecolor,&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= qq( |
$output .= &end_page(); |
</form> |
|
</body> |
|
</html>); |
|
$r->print($output); |
$r->print($output); |
return; |
return; |
} |
} |
Line 659 function goBack(target) {
|
Line 650 function goBack(target) {
|
} |
} |
$output .= '<input type="hidden" name="origin" value="'.$formname.'" />'."\n"; |
$output .= '<input type="hidden" name="origin" value="'.$formname.'" />'."\n"; |
$output .= &Apache::lonhtmlcommon::echo_form_input(['command','origin','subject','message','recipient','sender'],); |
$output .= &Apache::lonhtmlcommon::echo_form_input(['command','origin','subject','message','recipient','sender'],); |
$output .= '</form></body></html>'; |
$output .= &end_page(); |
$r->print($output); |
$r->print($output); |
return; |
return; |
} |
} |
Line 728 ENDSCRIPT
|
Line 719 ENDSCRIPT
|
$output .= '<input type="hidden" name="command" />'."\n". |
$output .= '<input type="hidden" name="command" />'."\n". |
'<input type="hidden" name="origin" value="'.$formname.'" />'."\n"; |
'<input type="hidden" name="origin" value="'.$formname.'" />'."\n"; |
$output .= &Apache::lonhtmlcommon::echo_form_input(['command','origin']); |
$output .= &Apache::lonhtmlcommon::echo_form_input(['command','origin']); |
$output .= ' |
$output .= &end_page(); |
</form> |
|
</body> |
|
</html>'; |
|
$r->print($output); |
$r->print($output); |
return; |
return; |
} |
} |