version 1.151, 2013/04/11 15:11:09
|
version 1.156, 2013/09/26 17:46:42
|
Line 642 sub upload_manager_javascript_forward_as
|
Line 642 sub upload_manager_javascript_forward_as
|
$numbuttons ++; |
$numbuttons ++; |
} |
} |
if (!$can_assign->{'int'}) { |
if (!$can_assign->{'int'}) { |
my $warning = &mt('You may not specify an initial password for each user, as this is only available when new users use LON-CAPA internal authentication.').'\n' |
my $warning = &mt('You may not specify an initial password for each user, as this is only available when new users use LON-CAPA internal authentication.').'\n'. |
&mt('Your current role does not have rights to create users with that authentication type.'); |
&mt('Your current role does not have rights to create users with that authentication type.'); |
$auth_update = <<"END"; |
$auth_update = <<"END"; |
// Currently the initial password field is only supported for internal auth |
// Currently the initial password field is only supported for internal auth |
Line 1631 sub print_userlist {
|
Line 1631 sub print_userlist {
|
|
|
my @cols = &infocolumns($context,$mode,$showcredits); |
my @cols = &infocolumns($context,$mode,$showcredits); |
if (!@cols) { |
if (!@cols) { |
$r->print('<hr clear="all" /><span class="LC_warning">'. |
$r->print('<hr style="clear:both;" /><span class="LC_warning">'. |
&mt('No user information selected for display.').'</span>'. |
&mt('No user information selected for display.').'</span>'. |
'<input type="hidden" name="phase" value="display" /></form>'."\n"); |
'<input type="hidden" name="phase" value="display" /></form>'."\n"); |
return; |
return; |
Line 1674 sub print_userlist {
|
Line 1674 sub print_userlist {
|
$r->print('<hr />'.&mt('Searching ...').'<br /> <br />'); |
$r->print('<hr />'.&mt('Searching ...').'<br /> <br />'); |
} |
} |
} else { |
} else { |
$r->print('<hr clear="all" /><div id="searching">'.&mt('Searching ...').'</div>'); |
$r->print('<hr style="clear:both;" /><div id="searching">'.&mt('Searching ...').'</div>'); |
} |
} |
$r->rflush(); |
$r->rflush(); |
if ($context eq 'course') { |
if ($context eq 'course') { |
Line 1988 sub get_cols_array {
|
Line 1988 sub get_cols_array {
|
} |
} |
if (($context eq 'course') && ($mode ne 'autoenroll') && |
if (($context eq 'course') && ($mode ne 'autoenroll') && |
($env{'course.'.$env{'request.course.id'}.'.internal.showphoto'})) { |
($env{'course.'.$env{'request.course.id'}.'.internal.showphoto'})) { |
push(@cols,'photos'); |
push(@cols,'photo'); |
} |
} |
if ($context eq 'domain') { |
if ($context eq 'domain') { |
push (@cols,'extent'); |
push (@cols,'extent'); |
Line 2119 sub get_column_names {
|
Line 2119 sub get_column_names {
|
if ($context eq 'domain' && $env{'form.roletype'} eq 'course') { |
if ($context eq 'domain' && $env{'form.roletype'} eq 'course') { |
$lt{'extent'} = &mt('course(s): description, section(s), status'); |
$lt{'extent'} = &mt('course(s): description, section(s), status'); |
} elsif ($context eq 'domain' && $env{'form.roletype'} eq 'community') { |
} elsif ($context eq 'domain' && $env{'form.roletype'} eq 'community') { |
$lt{'extent'} = &mt('communities: description, section(s), status'); |
$lt{'extent'} = &mt('community(s): description, section(s), status'); |
} elsif (($context eq 'author') || |
} elsif (($context eq 'author') || |
($context eq 'domain' && $env{'form.roletype'} eq 'author')) { |
($context eq 'domain' && $env{'form.roletype'} eq 'author')) { |
$lt{'extent'} = &mt('author'); |
$lt{'extent'} = &mt('author'); |
Line 2468 sub show_users_list {
|
Line 2468 sub show_users_list {
|
if ($mode eq 'pickauthor') { |
if ($mode eq 'pickauthor') { |
@sortable = ('username','fullname','email','status'); |
@sortable = ('username','fullname','email','status'); |
} |
} |
if (!grep(/^\Q$sortby\E$/,@sortable)) { |
my %is_sortable; |
|
map { $is_sortable{$_} => 1; } @sortable; |
|
unless ($is_sortable{$sortby}) { |
$sortby = 'username'; |
$sortby = 'username'; |
} |
} |
my $setting = $env{'form.roletype'}; |
my $setting = $env{'form.roletype'}; |
Line 2712 END
|
Line 2714 END
|
} |
} |
} |
} |
foreach my $item (@cols) { |
foreach my $item (@cols) { |
$output .= "<th><a href=\"javascript:document.$formname.sortby.value='$item';document.$formname.submit();\">$lt{$item}</a></th>\n"; |
$output .= "<th>"; |
|
if ($is_sortable{$item}) { |
|
$output .= "<a href=\"javascript:document.$formname.sortby.value='$item';document.$formname.submit();\">$lt{$item}</a>"; |
|
} else { |
|
$output .= $lt{$item}; |
|
} |
|
$output .= "</th>\n"; |
} |
} |
my %role_types = &role_type_names(); |
my %role_types = &role_type_names(); |
$output .= &Apache::loncommon::end_data_table_header_row(); |
$output .= &Apache::loncommon::end_data_table_header_row(); |
Line 4618 sub upfile_drop_add {
|
Line 4626 sub upfile_drop_add {
|
# Get current classlist |
# Get current classlist |
my $classlist = &Apache::loncoursedata::get_classlist(); |
my $classlist = &Apache::loncoursedata::get_classlist(); |
if (! defined($classlist)) { |
if (! defined($classlist)) { |
$r->print('<form name="studentform" method="post" action="/adm/createuser" />'. |
$r->print('<form name="studentform" method="post" action="/adm/createuser">'. |
'<input type="hidden" name="action" value="'.$env{'form.action'}.'" />'. |
'<input type="hidden" name="action" value="'.$env{'form.action'}.'" />'. |
'<p class="LC_info">'.&mt('There are no students with current/future access to the course.').'</p>'. |
'<p class="LC_info">'.&mt('There are no students with current/future access to the course.').'</p>'. |
'</form>'."\n"); |
'</form>'."\n"); |
Line 4741 sub print_drop_menu {
|
Line 4749 sub print_drop_menu {
|
$heading = &mt("Drop Students"); |
$heading = &mt("Drop Students"); |
} |
} |
$r->print('<h3>'.$heading.'</h3>'."\n". |
$r->print('<h3>'.$heading.'</h3>'."\n". |
'<form name="studentform" method="post">'."\n"); |
'<form name="studentform" method="post" action="">'."\n"); |
my $classlist = &Apache::loncoursedata::get_classlist(); |
my $classlist = &Apache::loncoursedata::get_classlist(); |
if (! defined($classlist)) { |
if (! defined($classlist)) { |
my $msg = ''; |
my $msg = ''; |