[BACK]Return to lonlogin.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / auth

Diff for /loncom/auth/lonlogin.pm between versions 1.112 and 1.114

version 1.112, 2008/12/10 15:45:38 version 1.114, 2009/03/10 18:18:31
Line 371  if (($showcoursecat eq '') || ($showcour Line 371  if (($showcoursecat eq '') || ($showcour
 }  }
 my $newuserlink;  my $newuserlink;
 if ($shownewuserlink) {  if ($shownewuserlink) {
     $newuserlink = &newuser_link($lt{'newuser'});      $newuserlink = &newuser_link($lt{'newuser'}).'<br />';
 }  }
 my $logintitle;  my $logintitle;
 if ($loginheader eq 'text') {  if ($loginheader eq 'text') {
     $logintitle ='<h1>'.$lt{'log'}.'</h1>';      $logintitle ='<h2>'.$lt{'log'}.'</h2>';
 } else {  } else {
     $logintitle = '<img src="'.$login.'" alt="'.      $logintitle = '<img src="'.$login.'" alt="'.
                   &mt('User Authentication').'" />';                    &mt('User Authentication').'" />';
Line 393  my $loginform=(<<LFORM); Line 393  my $loginform=(<<LFORM);
   <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="20" 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 />
   <input type="password" name="upass$now" size="20" /><br />    <input type="password" name="upass$now" size="15" /><br />
   <b><label for="udom">$lt{'dom'}</label>:</b><br />    <b><label for="udom">$lt{'dom'}</label>:</b><br />
   <input type="text" name="udom" size="20" value="$authdomain" /><br />    <input type="text" name="udom" size="15" value="$authdomain" /><br />
   <input type="submit" value="$lt{'log'}" />    <input type="submit" value="$lt{'log'}" />
 </form>  </form>
 LFORM  LFORM
Line 435  HEADER Line 435  HEADER
       
 <div class="LC_loginpage_loginInfo">  <div class="LC_loginpage_loginInfo">
         $loginhelp<br />          $loginhelp<br />
         $forgotpw<br /><br />          $forgotpw<br />
         $newuserlink<br />   $contactblock<br />
           $newuserlink
         $coursecatalog<br /><br />          $coursecatalog<br /><br />
         <a href="/adm/about.html"><b>$lt{'about'}</b></a><br/>          <a href="/adm/about.html"><b>$lt{'about'}</b></a>
  $contactblock  
 </div>  </div>
   
 <div class="LC_loginpage_space">&nbsp;</div>  <div class="LC_loginpage_space">&nbsp;</div>
Line 513  sub contactdisplay { Line 513  sub contactdisplay {
                          '<tt>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'.$servadm.'</tt><br />&nbsp;<br />';                           '<tt>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'.$servadm.'</tt><br />&nbsp;<br />';
     }      }
     if ($showhelpdesk) {      if ($showhelpdesk) {
         $contactblock .= '<b><a href="javascript:helpdesk()">'.$lt->{'helpdesk'}.'</a></b><br />';          $contactblock .= '<a href="javascript:helpdesk()">'.$lt->{'helpdesk'}.'</a><br />';
         my $thisurl = &escape('/adm/login');          my $thisurl = &escape('/adm/login');
         $$helpdeskscript = <<"ENDSCRIPT";          $$helpdeskscript = <<"ENDSCRIPT";
 <script type="text/javascript">  <script type="text/javascript">
Removed from v.1.112  
changed lines
  Added in v.1.114

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