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

Diff for /loncom/interface/createaccount.pm between versions 1.30 and 1.31

version 1.30, 2009/03/12 13:59:49 version 1.31, 2009/03/12 14:13:34
Line 467  sub login_box { Line 467  sub login_box {
     my $upassform = '<input type="password" name="upass'.$now.'" size="10" />';      my $upassform = '<input type="password" name="upass'.$now.'" size="10" />';
     $output .= '<form name="client" method="post" action="/adm/createaccount">'."\n".      $output .= '<form name="client" method="post" action="/adm/createaccount">'."\n".
                &Apache::lonhtmlcommon::start_pick_box()."\n";                 &Apache::lonhtmlcommon::start_pick_box()."\n";
     if ($context eq 'selfenroll') {  
         my $udomform =  '<input type="text" name="udom" size="10" value="'.  
                         $domain.'" />';  
         $output .= &Apache::lonhtmlcommon::row_title(&mt('Domain'),  
                                                      'LC_pick_box_title')."\n".  
                    $udomform."\n".  
                    &Apache::lonhtmlcommon::row_closure(1)."\n";  
     }  
   
     $output .= &Apache::lonhtmlcommon::row_title($titles{$context},      $output .= &Apache::lonhtmlcommon::row_title($titles{$context},
                                                  'LC_pick_box_title')."\n".                                                   'LC_pick_box_title')."\n".
                $unameform."\n".                 $unameform."\n".
                &Apache::lonhtmlcommon::row_closure(1)."\n".                 &Apache::lonhtmlcommon::row_closure(1)."\n".
                &Apache::lonhtmlcommon::row_title(&mt('Password'),                 &Apache::lonhtmlcommon::row_title(&mt('Password'),
                                                 'LC_pick_box_title')."\n".                                                  'LC_pick_box_title')."\n".
                $upassform."\n".'<br /><br />'."\n".                 $upassform;
       if ($context eq 'selfenroll') {
           my $udomform =  '<input type="text" name="udom" size="10" value="'.
                           $domain.'" />';
           $output .= &Apache::lonhtmlcommon::row_closure(1)."\n".
                      &Apache::lonhtmlcommon::row_title(&mt('Domain'),
                                                        'LC_pick_box_title')."\n".
                      $udomform."\n";
       }
   
       $output .= &Apache::lonhtmlcommon::row_closure(0).
                  &Apache::lonhtmlcommon::row_title().
                '<input type="button" name="username_validation" value="'.                 '<input type="button" name="username_validation" value="'.
                $submit_text.'" onclick="javascript:send()" />'."\n".                 $submit_text.'" onclick="javascript:send()" />'."\n".
                &Apache::lonhtmlcommon::row_closure(1)."\n".                 &Apache::lonhtmlcommon::row_closure(1)."\n".
Removed from v.1.30  
changed lines
  Added in v.1.31

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