Diff for /loncom/auth/lonlogin.pm between versions 1.65 and 1.66

version 1.65, 2005/06/07 02:14:28 version 1.66, 2005/06/07 13:42:03
Line 279  my %lt=&Apache::lonlocal::texthash( Line 279  my %lt=&Apache::lonlocal::texthash(
                   'servadm' => 'Server Administration',                    'servadm' => 'Server Administration',
                   'sysadm' => 'System Administration',                    'sysadm' => 'System Administration',
                   'helpdesk' => 'Contact Helpdesk');                    'helpdesk' => 'Contact Helpdesk');
   # -------------------------------------------------- Change password field name
       my $now=time;
 # ---------------------------------------------------------- Serve rest of page  # ---------------------------------------------------------- Serve rest of page
     $r->print(<<ENDSCRIPT);      $r->print(<<ENDSCRIPT);
   
Line 318  my %lt=&Apache::lonlocal::texthash( Line 319  my %lt=&Apache::lonlocal::texthash(
         initkeys();          initkeys();
   
         this.document.server.elements.upass0.value          this.document.server.elements.upass0.value
     =crypted(this.document.client.elements.upass.value.substr(0,15));      =crypted(this.document.client.elements.upass$now.value.substr(0,15));
  this.document.server.elements.upass1.value   this.document.server.elements.upass1.value
     =crypted(this.document.client.elements.upass.value.substr(15,15));      =crypted(this.document.client.elements.upass$now.value.substr(15,15));
  this.document.server.elements.upass2.value   this.document.server.elements.upass2.value
     =crypted(this.document.client.elements.upass.value.substr(30,15));      =crypted(this.document.client.elements.upass$now.value.substr(30,15));
   
           this.document.client.elements.uname.value='';
           this.document.client.elements.upass$now.value='';
   
         this.document.server.submit();          this.document.server.submit();
  return false;   return false;
Line 449  ENDNOOPT Line 453  ENDNOOPT
       </tr>        </tr>
       <tr>        <tr>
        <td bgcolor="$mainbg"><font size=-1><b>&nbsp;&nbsp;&nbsp;$lt{'pw'}:</b></font></td>         <td bgcolor="$mainbg"><font size=-1><b>&nbsp;&nbsp;&nbsp;$lt{'pw'}:</b></font></td>
        <td bgcolor="$mainbg"><input type="password" name="upass" size="10" /></td>         <td bgcolor="$mainbg"><input type="password" name="upass$now" size="10" /></td>
       </tr>        </tr>
       <tr>        <tr>
        <td bgcolor="$mainbg"><font size=-1><b>&nbsp;&nbsp;&nbsp;$lt{'dom'}:</b></font></td>         <td bgcolor="$mainbg"><font size=-1><b>&nbsp;&nbsp;&nbsp;$lt{'dom'}:</b></font></td>

Removed from v.1.65  
changed lines
  Added in v.1.66


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