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

Diff for /loncom/interface/lonpickcourse.pm between versions 1.85 and 1.88

version 1.85, 2009/07/31 03:01:31 version 1.88, 2009/10/31 14:27:48
Line 102  sub handler { Line 102  sub handler {
   
     if ((($env{'form.form'} eq 'cu') || ($env{'form.form'} eq 'studentform')) &&       if ((($env{'form.form'} eq 'cu') || ($env{'form.form'} eq 'studentform')) && 
         ($env{'form.pickedcourse'})) {          ($env{'form.pickedcourse'})) {
             $loaditem{'onload'} .= 'setSections()';          if ($env{'form.form'} eq 'cu') {
               $loaditem{'onload'} .= 'setRoles();';
           }
           $loaditem{'onload'} .= 'setSections();';
     }      }
     my $js = &js_changer();      my $js = &js_changer();
     $r->print(&Apache::loncommon::start_page($title,$js,      $r->print(&Apache::loncommon::start_page($title,$js,
Line 220  ENDONE Line 223  ENDONE
         $process_pick .= <<"ENDTWO";          $process_pick .= <<"ENDTWO";
     if (pickedDomain == dom) {      if (pickedDomain == dom) {
         if (pickedCourse != '') {          if (pickedCourse != '') {
             var courseTarget = "cc./"+pickedDomain+"/"+pickedCourse              var ccrole = "cc";
               var pickedType = "$env{'form.type'}";
               if (pickedType == "Community") {
                   ccrole = "co";
               }
               var courseTarget = ccrole+"./"+pickedDomain+"/"+pickedCourse
             opener.document.title='Role selected. Please stand by.';              opener.document.title='Role selected. Please stand by.';
             opener.status='Role selected. Please stand by.';              opener.status='Role selected. Please stand by.';
             opener.document.rolechoice.newrole.value=courseTarget              opener.document.rolechoice.newrole.value=courseTarget
Line 252  sub create_user_javascript { Line 260  sub create_user_javascript {
     my $output;      my $output;
     #javascript for reporting sections and groups then closing      #javascript for reporting sections and groups then closing
     if ($env{'form.pickedcourse'}) {      if ($env{'form.pickedcourse'}) {
         my ($cdom,$cnum) = split/_/,$env{'form.pickedcourse'};          my %coursedescription = 
               &Apache::lonnet::coursedescription($env{'form.pickedcourse'},
                                                  {'one_time' => '1'});
           my $cdom = $coursedescription{'domain'};
           my $cnum = $coursedescription{'num'};
           my $crstype = $coursedescription{'type'};
         my $sec_element = 'currsec';          my $sec_element = 'currsec';
         my $grplist_element = 'groups';          my $grplist_element = 'groups';
         my ($sections,$groups) =          my ($sections,$groups) =
Line 266  sub create_user_javascript { Line 279  sub create_user_javascript {
 function setSections() {  function setSections() {
     opener.document.$env{"form.form"}.$grplist_element.value='$groupslist';      opener.document.$env{"form.form"}.$grplist_element.value='$groupslist';
     window.opener.setSect('$seclist');      window.opener.setSect('$seclist');
     self.close()      self.close();
   }
   function setRoles() {
       window.opener.setRole('$crstype');
 }  }
 </script>  </script>
 |;  |;
Line 593  sub build_filters { Line 609  sub build_filters {
             $cloneableon = $cloneableoff;              $cloneableon = $cloneableoff;
             $cloneableoff = '';              $cloneableoff = '';
         }          }
         $cloneableonlyform = '<span class="LC_nobreak"><label><input type="radio" name="cloneableonly" value="1" '.$cloneableon.'/>&nbsp;'.&mt('Yes').'</label>'.('&nbsp;'x3).'<label><input type="radio" name="cloneableonly" value="" '.$cloneableoff.' />&nbsp;'.&mt('No').'</label></span>';          $cloneableonlyform = '<span class="LC_nobreak"><label><input type="radio" name="cloneableonly" value="1" '.$cloneableon.'/>&nbsp;'.&mt('Required').'</label>'.('&nbsp;'x3).'<label><input type="radio" name="cloneableonly" value="" '.$cloneableoff.' />&nbsp;'.&mt('No restriction').'</label></span>';
         if ($env{'form.form'} eq 'ccrs') {          if ($env{'form.form'} eq 'ccrs') {
             $cloneabletitle = &mt('Cloneable for').' '.$cloneruname.':'.$clonerudom;              $cloneabletitle = &mt('Cloneable for').' '.$cloneruname.':'.$clonerudom;
         } else {          } else {
Line 880  sub gochoose_javascript { Line 896  sub gochoose_javascript {
                                  list  => 'courselist',                                   list  => 'courselist',
                                  },                                   },
                      'Community' => {                       'Community' => {
                                  name  => 'grouppick',                                   name  => 'coursepick',
                                  total => 'grouptotal',                                   total => 'coursetotal',
                                  list  => 'grouplist',                                   list  => 'courselist',
                               },                                },
                     );                      );
     my $output .= qq|      my $output .= qq|
Removed from v.1.85  
changed lines
  Added in v.1.88

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