version 1.31, 2008/12/03 21:16:21
|
version 1.34, 2009/05/11 16:51:27
|
Line 118 sub start_page {
|
Line 118 sub start_page {
|
$start_page |
$start_page |
$breadcrumbs |
$breadcrumbs |
<br /> |
<br /> |
<form name="$formname" method="POST"> |
<form name="$formname" method="post"> |
ENDONE |
ENDONE |
|
|
return $output; |
return $output; |
Line 464 function setCourseCat(formname) {
|
Line 464 function setCourseCat(formname) {
|
</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,'Roles'); |
$output .= &Apache::lonhtmlcommon::role_select_row(\@roles,&mt('Roles')); |
$output .= &Apache::lonhtmlcommon::course_select_row('Courses',$formname,$totcodes,\@codetitles,\%idlist,\%idlist_titles); |
$output .= &Apache::lonhtmlcommon::course_select_row(&mt('Courses'),$formname,$totcodes,\@codetitles,\%idlist,\%idlist_titles); |
$output .= &Apache::lonhtmlcommon::status_select_row(\%longtypes,&mt('Access status')); |
$output .= &Apache::lonhtmlcommon::status_select_row(\%longtypes,&mt('Access status')); |
$output .= &Apache::lonhtmlcommon::email_default_row(\%authtypes,&mt('Username -> Email conversion'),$descrip); |
$output .= &Apache::lonhtmlcommon::email_default_row(\%authtypes,&mt('Username -> E-mail conversion'),$descrip); |
$output .= &Apache::lonhtmlcommon::submit_row(&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::submit_row(&mt('Submit'),$cmd,$submit_text); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= &Apache::lonhtmlcommon::end_pick_box(); |
$output .= &end_page(); |
$output .= &end_page(); |
Line 769 sub get_user_info {
|
Line 769 sub get_user_info {
|
sub form_elements { |
sub form_elements { |
my ($longtypes,$authtypes) = @_; |
my ($longtypes,$authtypes) = @_; |
%{$longtypes} = ( |
%{$longtypes} = ( |
active => 'Currently has access', |
active => &mt('Currently has access'), |
previous => 'Previously had access', |
previous => &mt('Previously had access'), |
future => 'Will have future access', |
future => &mt('Will have future access'), |
); |
); |
%{$authtypes} = ( |
%{$authtypes} = ( |
krb4 => 'Kerberos 4', |
krb4 => 'Kerberos 4', |