loncom/auth/lonlogin.pm - diff

Return to lonlogin.pm CVS log

Up to [LON-CAPA] / loncom / auth

Diff for /loncom/auth/lonlogin.pm between versions 1.98 and 1.99

version 1.98, 2008/01/16 20:42:44	version 1.99, 2008/01/24 14:30:28
Line 349 my %lt=&Apache::lonlocal::texthash(	Line 349 my %lt=&Apache::lonlocal::texthash(
'serv' => 'Server',	'serv' => 'Server',
'servadm' => 'Server Administration',	'servadm' => 'Server Administration',
'helpdesk' => 'Contact Helpdesk',	'helpdesk' => 'Contact Helpdesk',
'forgotpw' => 'Forgot password?');	'forgotpw' => 'Forgot password?',
	'options_headline' => 'Select Accessibility Options',
	'sprs_img' => 'Suppress rendering of images',
	'sprs_applet' => 'Suppress Java applets',
	'sprs_embed' => 'Suppress rendering of embedded multimedia',
	'sprs_font' => 'Increase font size',
	'sprs_blackwhite' => 'Switch to black and white mode',
	'remember' => 'Remember these settings for next login');
# -------------------------------------------------- Change password field name	# -------------------------------------------------- Change password field name
my $forgotpw = &forgotpwdisplay(%lt);	my $forgotpw = &forgotpwdisplay(%lt);
my $loginhelp = &loginhelpdisplay(%lt);	my $loginhelp = &loginhelpdisplay(%lt);
Line 454 ENDSERVERFORM	Line 461 ENDSERVERFORM
<td align="center" valign="middle" bgcolor="$sidebg">	<td align="center" valign="middle" bgcolor="$sidebg">
ENDTOP	ENDTOP
} else {	} else {
$r->print('<h1>The Learning<i>Online</i> Network with CAPA</h1><h2>Text-based Interface Login</h2>'.$announcements);	$r->print('<h1>The Learning<i>Online</i> Network with CAPA</h1>'
	.'<h2>'.&mt('Text-based Interface Login').'</h2>'
	.$announcements);
}	}
$r->print('<form name="client" onsubmit="return(send())">');	$r->print('<form name="client" onsubmit="return(send())">');
unless ($fullgraph) {	unless ($fullgraph) {
$r->print(<<ENDACCESSOPTIONS);	$r->print(<<ENDACCESSOPTIONS);
<h3>Select Accessibility Options</h3>	<h3>$lt{'options_headline'}</h3>
<label><input type="checkbox" name="imagesuppress" /> Suppress rendering of images</label><br />	<label><input type="checkbox" name="imagesuppress" /> $lt{'sprs_img'}</label><br />
<label><input type="checkbox" name="appletsuppress" /> Suppress Java applets</label><br />	<label><input type="checkbox" name="appletsuppress" /> $lt{'sprs_applet'}</label><br />
<label><input type="checkbox" name="embedsuppress" /> Suppress rendering of embedded multimedia</label><br />	<label><input type="checkbox" name="embedsuppress" /> $lt{'sprs_embed'}</label><br />
<label><input type="checkbox" name="fontenhance" /> Increase font size</label><br />	<label><input type="checkbox" name="fontenhance" /> $lt{'sprs_font'}</label><br />
<label><input type="checkbox" name="blackwhite" /> Switch to black and white mode</label><br />	<label><input type="checkbox" name="blackwhite" /> $lt{'sprs_blackwhite'}</label><br />
<input type="checkbox" name="remember" /> Remember these settings for next login<hr />	<br />
	<input type="checkbox" name="remember" /> $lt{'remember'}<hr />
ENDACCESSOPTIONS	ENDACCESSOPTIONS
} else {	} else {
$r->print(<<ENDNOOPT);	$r->print(<<ENDNOOPT);

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.98
changed lines
	Added in v.1.99