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

Diff for /loncom/auth/lonlogin.pm between versions 1.108 and 1.109

version 1.108, 2008/11/23 11:01:01 version 1.109, 2008/12/01 15:03:43
Line 266  my $login=&Apache::loncommon::designparm Line 266  my $login=&Apache::loncommon::designparm
 if ($login eq '') {  if ($login eq '') {
 $login = $iconpath.'/'.&mt('userauthentication.gif');  $login = $iconpath.'/'.&mt('userauthentication.gif');
 }  }
   my $showbanner = 1;
   my $showmainlogo = 1;
   if (defined(&Apache::loncommon::designparm('login.showlogo_img',$domain))) {
       $showbanner = &Apache::loncommon::designparm('login.showlogo_img',$domain);
   }
   if (defined(&Apache::loncommon::designparm('login.showlogo_logo',$domain))) {
       $showmainlogo = &Apache::loncommon::designparm('login.showlogo_logo',$domain);
   }
 my $showadminmail=&Apache::loncommon::designparm('login.adminmail',$domain);  my $showadminmail=&Apache::loncommon::designparm('login.adminmail',$domain);
 my $showcoursecat =  my $showcoursecat =
 &Apache::loncommon::designparm('login.coursecatalog',$domain);  &Apache::loncommon::designparm('login.coursecatalog',$domain);
Line 398  my $noscript_warning='<noscript><span cl Line 406  my $noscript_warning='<noscript><span cl
 my $helpdeskscript;  my $helpdeskscript;
 my $contactblock = &contactdisplay(\%lt,$servadm,$showadminmail,  my $contactblock = &contactdisplay(\%lt,$servadm,$showadminmail,
                             $version,$authdomain,\$helpdeskscript);                              $version,$authdomain,\$helpdeskscript);
 my $loncapaheader=(<<HEADER);  
 <!-- The LON-CAPA Header -->  
 <table border="0" align="left" width="100%" cellspacing="0" cellpadding="1">  
  <tr>  
   <td align="left" valign="top" bgcolor="$pgbg">  
       <img src="$img" border=0 alt="The Learning Online Network with CAPA" />   
   </td>  
  </tr>  
 </table>  
 HEADER  
   
 my $loginform=(<<LFORM);  my $loginform=(<<LFORM);
 <form name="client" onsubmit="return(send())">  <form name="client" onsubmit="return(send())">
Line 423  my $loginform=(<<LFORM); Line 421  my $loginform=(<<LFORM);
 </form>  </form>
 LFORM  LFORM
   
 if ($fullgraph) {   if ($fullgraph) {
 $r->print(<<ENDTOP);      if ($showbanner) {
 $loncapaheader          $r->print(<<HEADER);
 <div class="LC_loginpage_space">&nbsp;</div>  <!-- The LON-CAPA Header -->
     <img src="$logo" alt="" />  <table border="0" align="left" width="100%" cellspacing="0" cellpadding="1">
    <tr>
     <td align="left" valign="top" bgcolor="$pgbg">
         <img src="$img" border=0 alt="The Learning Online Network with CAPA" />
     </td>
    </tr>
   </table>
   HEADER
       }
       if ($showmainlogo) {
           $r->print('<div class="LC_loginpage_space">&nbsp;</div>'."\n".
                     '    <img src="'.$logo.'" alt="" />'."\n");
       }
       $r->print(<<ENDTOP);
 <div class="LC_loginpage_loginContainer">  <div class="LC_loginpage_loginContainer">
  <fieldset class="LC_loginpage_fieldset">   <fieldset class="LC_loginpage_fieldset">
   <legend class="LC_loginpage_legend">$logintitle</legend>    <legend class="LC_loginpage_legend">$logintitle</legend>
Removed from v.1.108  
changed lines
  Added in v.1.109

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