version 1.39, 2006/02/09 13:45:54
|
version 1.41, 2006/03/15 22:11:04
|
Line 38 use LONCAPA::Enrollment;
|
Line 38 use LONCAPA::Enrollment;
|
|
|
############################################################### |
############################################################### |
sub header { |
sub header { |
my $html=&Apache::lonxml::xmlbegin(); |
return &Apache::loncommon::start_page('Classlist Manager'); |
my $bodytag=&Apache::loncommon::bodytag('Classlist Manager'); |
|
return(<<ENDHEAD); |
|
$html |
|
<head> |
|
<title>LON-CAPA Classlist Manager</title> |
|
</head> |
|
$bodytag |
|
ENDHEAD |
|
} |
} |
|
|
############################################################### |
############################################################### |
|
|
sub choose_header { |
sub choose_header { |
my $action = shift; |
my ($action) = @_; |
my $bodytag=&Apache::loncommon::bodytag('Classlist Manager'); |
|
my $scripttag = qq| |
my $scripttag = qq| |
<script language='javascript' type='text/javascript'> |
<script language='javascript' type='text/javascript'> |
<!-- |
<!-- |
Line 175 function countChecked(field) {
|
Line 167 function countChecked(field) {
|
// End hiding --> |
// End hiding --> |
</script> |
</script> |
|; |
|; |
my $html=&Apache::lonxml::xmlbegin(); |
|
return(<<ENDHEAD); |
return &Apache::loncommon::start_page('Classlist Manager', |
$html |
$scripttag); |
<head> |
|
<title>LON-CAPA Classlist Manager</title> |
|
$scripttag |
|
$bodytag |
|
ENDHEAD |
|
} |
} |
|
|
sub print_mainbox { |
sub print_mainbox { |
Line 1029 Note: Any students previously added manu
|
Line 1016 Note: Any students previously added manu
|
if ($enrollvar{'showphoto'}) { |
if ($enrollvar{'showphoto'}) { |
my ($update,$commentary) = &Apache::lonnet::auto_photochoice($crs, |
my ($update,$commentary) = &Apache::lonnet::auto_photochoice($crs, |
$dom); |
$dom); |
$r->print('<br />'.$commentary.'<br /><br /> |
if ($update) { |
|
$r->print('<br />'.$commentary.'<br /><br /> |
<form name="photoupdate" method="post"> |
<form name="photoupdate" method="post"> |
<input type ="button" name="retrieve" value="'.&mt('Update photo repository').'" |
<input type ="button" name="retrieve" value="'.&mt('Update photo repository').'" |
onclick="javascript:document.photoupdate.submit()" /> |
onclick="javascript:document.photoupdate.submit()" /> |
<input type ="hidden" name="action" value="'.$action.'" /> |
<input type ="hidden" name="action" value="'.$action.'" /> |
<input type ="hidden" name="state" value="process" /> |
<input type ="hidden" name="state" value="process" /> |
</form>'); |
</form>'); |
|
} else { |
|
$r->print(&mt('Update of photos via the Automated Enrollment Manager is unavailable in this domain.').'<br /><br /><input type="button" name=mainmenu" value="Go back" onclick="javascript:history.go(-1);" />'); |
|
} |
} else { |
} else { |
$r->print('Update of photos is unavailable, as import of student photos is currently disabled.<br />Enable this first via: <a href="/adm/populate?action=photos">'.$$tasktitleref{'photos'}.'</a>'); |
$r->print('Update of photos is unavailable, as import of student photos is currently disabled.<br />Enable this first via: <a href="/adm/populate?action=photos">'.$$tasktitleref{'photos'}.'</a>'); |
} |
} |
Line 1263 ENDFOUR
|
Line 1254 ENDFOUR
|
|
|
############################################################### |
############################################################### |
sub print_doc_base { |
sub print_doc_base { |
my $r = shift; |
my ($r) = @_; |
$r->print(<<ENDBASE); |
$r->print(<<ENDBASE); |
</td> |
</td> |
</tr> |
</tr> |
</table> |
</table> |
<br/> |
<br /> |
</body> |
|
</html> |
|
ENDBASE |
ENDBASE |
|
$r->print(&Apache::loncommon::end_page()); |
} |
} |
|
|
################################################################### |
################################################################### |