--- loncom/interface/Attic/londropadd.pm 2005/04/07 06:56:23 1.127
+++ loncom/interface/Attic/londropadd.pm 2006/03/21 18:34:23 1.138
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
-# $Id: londropadd.pm,v 1.127 2005/04/07 06:56:23 albertel Exp $
+# $Id: londropadd.pm,v 1.138 2006/03/21 18:34:23 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -43,15 +43,9 @@ use Apache::lonlocal;
###############################################################
###############################################################
sub header {
- my $html=&Apache::lonxml::xmlbegin();
- my $bodytag=&Apache::loncommon::bodytag('Enrollment Manager');
- my $title = &mt('LON-CAPA Enrollment Manager');
+ my $start_page=&Apache::loncommon::start_page('Enrollment Manager');
return(<
\n".''; + $Str .= "
\n".'
\n"; + "\n
\n";
$Str .= ''."
$krbform
@@ -1115,8 +1132,10 @@ $date_table
$lt{'idsn'}:
+
\n";
$Str .= &mt('Note: for large courses, this operation may be time '.
@@ -852,16 +868,16 @@ sub date_setting_table {
my ($starttime,$endtime,$mode) = @_;
my ($startform,$endform)=&setup_date_selectors($starttime,$endtime,$mode);
my $dateDefault = '
@@ -1003,7 +1020,7 @@ sub print_enroll_single_student_form {
$lt{'pswd'}
-$lt{'psam'}
+$lt{'psam'}$authhelp
@@ -1293,8 +1332,23 @@ END
$lt{'end'}
-
END
+ if ($env{'course.'.$env{'request.course.id'}.'.internal.showphoto'}) {
+ my %photo_options = &Apache::lonlocal::texthash(
+ 'on' => 'Show',
+ 'off' => 'Hide',
+ );
+ my $photochg = 'on';
+ if ($displayphotos eq 'on') {
+ $photochg = 'off';
+ }
+ $r->print(' '."\n".' '.
+ ''.
+ $photo_options{$photochg}.' '.$lt{'photo'}."\n".
+ ' '."\n");
+ }
+ $r->print(" \n");
} elsif ($mode eq 'csv') {
#
# Open a file
@@ -1391,16 +1445,16 @@ END
$studentcount++;
my $cellentry;
if ($type eq 'auto') {
- $cellentry = ''.&mt('auto').' Change';
+ $cellentry = ''.&mt('auto').' ';
$autocount ++;
} else {
- $cellentry = '