version 1.114, 2009/03/10 18:18:31
|
version 1.117, 2009/04/01 14:43:19
|
Line 84 sub handler {
|
Line 84 sub handler {
|
$r->print( |
$r->print( |
$start_page |
$start_page |
.'<h1>'.&mt('You are already logged in!').'</h1>' |
.'<h1>'.&mt('You are already logged in!').'</h1>' |
.'<p>'.&mt('Please either [_1]continue the current session[_2] or [_3]logout[_4].', |
.'<p>'.&mt('Please either [_1]continue the current session[_2] or [_3]log out[_4].', |
'<a href="/adm/roles">','</a>','<a href="/adm/logout">','</a>').'</p>' |
'<a href="/adm/roles">','</a>','<a href="/adm/logout">','</a>').'</p>' |
.'<p><a href="/adm/loginproblems.html">'.&mt('Login problems?').'</a></p>' |
.'<p><a href="/adm/loginproblems.html">'.&mt('Login problems?').'</a></p>' |
.$end_page |
.$end_page |
Line 270 my $shownewuserlink =
|
Line 270 my $shownewuserlink =
|
my $now=time; |
my $now=time; |
my $js = (<<ENDSCRIPT); |
my $js = (<<ENDSCRIPT); |
|
|
<script language="JavaScript"> |
<script type="text/javascript" language="JavaScript"> |
function send() |
function send() |
{ |
{ |
this.document.server.elements.uname.value |
this.document.server.elements.uname.value |
Line 390 my $contactblock = &contactdisplay(\%lt,
|
Line 390 my $contactblock = &contactdisplay(\%lt,
|
|
|
my $loginform=(<<LFORM); |
my $loginform=(<<LFORM); |
<form name="client" onsubmit="return(send())"> |
<form name="client" onsubmit="return(send())"> |
<input type="hidden" name="lextkey" value="$lextkey"> |
<input type="hidden" name="lextkey" value="$lextkey" /> |
<input type="hidden" name="uextkey" value="$uextkey"> |
<input type="hidden" name="uextkey" value="$uextkey" /> |
<b><label for="uname">$lt{'un'}</label>:</b><br /> |
<b><label for="uname">$lt{'un'}</label>:</b><br /> |
<input type="text" name="uname" size="15" value="$authusername" /><br /> |
<input type="text" name="uname" size="15" value="$authusername" /><br /> |
<b><label for="upass$now">$lt{'pw'}</label>:</b><br /> |
<b><label for="upass$now">$lt{'pw'}</label>:</b><br /> |
Line 409 if ($fullgraph) {
|
Line 409 if ($fullgraph) {
|
<table border="0" align="left" width="100%" cellspacing="0" cellpadding="1"> |
<table border="0" align="left" width="100%" cellspacing="0" cellpadding="1"> |
<tr> |
<tr> |
<td align="left" valign="top" bgcolor="$pgbg"> |
<td align="left" valign="top" bgcolor="$pgbg"> |
<img src="$img" border=0 alt="The Learning Online Network with CAPA" /> |
<img src="$img" border="0" alt="The Learning Online Network with CAPA" /> |
</td> |
</td> |
</tr> |
</tr> |
</table> |
</table> |
Line 451 if($announcements){$r->print('<div class
|
Line 451 if($announcements){$r->print('<div class
|
|
|
if ($fullgraph) { |
if ($fullgraph) { |
$r->print(<<ENDDOCUMENT); |
$r->print(<<ENDDOCUMENT); |
<table border=0 cellspacing=0 cellpadding=0> |
<table border="0" cellspacing="0" cellpadding="0"> |
<tr> |
<tr> |
<td align="left" valign="top"> |
<td align="left" valign="top"> |
<small><b> $lt{'dom'}: </b></small> |
<small><b> $lt{'dom'}: </b></small> |