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

Diff for /loncom/interface/lonuserutils.pm between versions 1.49 and 1.51

version 1.49, 2008/01/20 00:19:11 version 1.51, 2008/03/06 21:57:33
Line 1994  function username_display_launch(usernam Line 1994  function username_display_launch(usernam
         }          }
     }      }
     if (target == 'modify') {      if (target == 'modify') {
         document.studentform.srchterm.value=username;          if (document.studentform.userwin.checked == true) {
         document.studentform.srchdomain.value=domain;              var url = '/adm/createuser?srchterm='+username+'&srchdomain='+domain+'&phase=get_user_info&action=singleuser&srchin=dom&srchby=uname&srchtype=exact&popup=1';
         document.studentform.phase.value='get_user_info';              var options = 'height=600,width=800,resizable=yes,scrollbars=yes,location=no,menubar=no,toolbar=no';
         document.studentform.action.value = 'singleuser';              modifywin = window.open(url,'',options,1);
         document.studentform.submit();              modifywin.focus();
               return;
           } else {
               document.studentform.srchterm.value=username;
               document.studentform.srchdomain.value=domain;
               document.studentform.phase.value='get_user_info';
               document.studentform.action.value = 'singleuser';
               document.studentform.submit();
           }
     }      }
     if (target == 'aboutme') {      if (target == 'aboutme') {
         document.location.href = '/adm/'+domain+'/'+username+'/aboutme';          if (document.studentform.userwin.checked == true) {
     }              var url = '/adm/'+domain+'/'+username+'/aboutme?popup=1';
     if (target == 'aboutmewin') {              var options = 'height=600,width=800,resizable=yes,scrollbars=yes,location=no,menubar=no,toolbar=no';
         var url = '/adm/'+domain+'/'+username+'/aboutme';              aboutmewin = window.open(url,'',options,1);
         var options = 'height=600,width=800,resizable=yes,scrollbars=yes,location=no,menubar=no,toolbar=no';              aboutmewin.focus();
         aboutmewin = window.open(url,'',options,1);              return;
           } else {
               document.location.href = '/adm/'+domain+'/'+username+'/aboutme';
           }
     }      }
 }  }
 </script>  </script>
Line 2041  END Line 2052  END
                        'ac'         => "Action to take for selected users",                         'ac'         => "Action to take for selected users",
                        'link'       => "Behavior of username links",                         'link'       => "Behavior of username links",
                        'aboutme'    => "Display a user's personal page",                         'aboutme'    => "Display a user's personal page",
                        'aboutmewin' => "Display a user's personal page in a new window",                         'owin'       => "Open in a new window",
                        'modify'     => "Modify a user's information",                         'modify'     => "Modify a user's information",
                       );                        );
     if ($context eq 'domain' && $env{'form.roletype'} eq 'course') {      if ($context eq 'domain' && $env{'form.roletype'} eq 'course') {
Line 2098  END Line 2109  END
 <input type="hidden" name="srchdomain" value="" />   <input type="hidden" name="srchdomain" value="" /> 
 END  END
             $output = '<p>';              $output = '<p>';
             my @linkdests = ('aboutme','aboutmewin');              my @linkdests = ('aboutme');
             if ($permission->{'cusr'}) {              if ($permission->{'cusr'}) {
                 unshift (@linkdests,'modify');                  unshift (@linkdests,'modify');
             }              }
Line 2114  END Line 2125  END
                 }                  }
                 $output .= '<label><input type="radio" name="usernamelink" value="'.$item.'"'.$checkedstr.'>&nbsp;'.$lt{$item}.'</label>&nbsp;&nbsp;';                  $output .= '<label><input type="radio" name="usernamelink" value="'.$item.'"'.$checkedstr.'>&nbsp;'.$lt{$item}.'</label>&nbsp;&nbsp;';
             }              }
             $output .= '</span><br />';              my $checkwin;
               if ($env{'form.userwin'}) { 
                   $checkwin = 'checked = "checked"'; 
               }
               $output .= '&nbsp;&nbsp;&nbsp;&nbsp;<input type="checkbox" name="userwin" value="1" $checkwin />'.$lt{'owin'}.'</span><br />';
             if ($actionselect) {              if ($actionselect) {
                 $output .= <<"END";                  $output .= <<"END";
 $lt{'ac'}:&nbsp;$actionselect <input type="button" value="$lt{'go'}" onclick="javascript:opendatebrowser(this.form,'studentform','go')" /></p>  $lt{'ac'}:&nbsp;$actionselect <input type="button" value="$lt{'go'}" onclick="javascript:opendatebrowser(this.form,'studentform','go')" /></p>
Line 4192  sub set_login { Line 4207  sub set_login {
 }  }
   
 sub course_sections {  sub course_sections {
     my ($sections_count,$role) = @_;      my ($sections_count,$role,$current_sec) = @_;
     my $output = '';      my $output = '';
     my @sections = (sort {$a <=> $b} keys %{$sections_count});      my @sections = (sort {$a <=> $b} keys %{$sections_count});
     my $numsec = scalar(@sections);      my $numsec = scalar(@sections);
       my $is_selected = ' selected="selected" ';
     if ($numsec <= 1) {      if ($numsec <= 1) {
         $output = '<select name="currsec_'.$role.'" >'."\n".          $output = '<select name="currsec_'.$role.'" >'."\n".
                   '  <option value="">'.&mt('Select').'</option>'."\n".                    '  <option value="">'.&mt('Select').'</option>'."\n";
           if ($current_sec eq 'none') {
               $output .=       
                     '  <option value=""'.$is_selected.'>'.&mt('No section').'</option>'."\n";
           } else {
               $output .=
                   '  <option value="">'.&mt('No section').'</option>'."\n";                    '  <option value="">'.&mt('No section').'</option>'."\n";
           }
         if ($numsec == 1) {          if ($numsec == 1) {
             $output .=                if ($current_sec eq $sections[0]) {
                   $output .=
                     '  <option value="'.$sections[0].'"'.$is_selected.'>'.$sections[0].'</option>'."\n";
               } else {
                   $output .=  
                   '  <option value="'.$sections[0].'" >'.$sections[0].'</option>'."\n";                    '  <option value="'.$sections[0].'" >'.$sections[0].'</option>'."\n";
               }
         }          }
     } else {      } else {
         $output = '<select name="currsec_'.$role.'" ';          $output = '<select name="currsec_'.$role.'" ';
Line 4210  sub course_sections { Line 4237  sub course_sections {
         if (scalar(@sections) < 4) { $multiple = scalar(@sections); }          if (scalar(@sections) < 4) { $multiple = scalar(@sections); }
         if ($role eq 'st') {          if ($role eq 'st') {
             $output .= '>'."\n".              $output .= '>'."\n".
                        '  <option value="">'.&mt('Select').'</option>'."\n".                         '  <option value="">'.&mt('Select').'</option>'."\n";
               if ($current_sec eq 'none') {
                   $output .= 
                          '  <option value=""'.$is_selected.'>'.&mt('No section')."</option>\n";
               } else {
                   $output .=
                        '  <option value="">'.&mt('No section')."</option>\n";                         '  <option value="">'.&mt('No section')."</option>\n";
               }
         } else {          } else {
             $output .= 'multiple="multiple" size="'.$multiple.'">'."\n";              $output .= 'multiple="multiple" size="'.$multiple.'">'."\n";
         }          }
         foreach my $sec (@sections) {          foreach my $sec (@sections) {
             $output .= '<option value="'.$sec.'">'.$sec."</option>\n";              if ($current_sec eq $sec) {
                   $output .= '<option value="'.$sec.'"'.$is_selected.'>'.$sec."</option>\n";
               } else {
                   $output .= '<option value="'.$sec.'">'.$sec."</option>\n";
               }
         }          }
     }      }
     $output .= '</select>';      $output .= '</select>';
Removed from v.1.49  
changed lines
  Added in v.1.51

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