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

Diff for /loncom/interface/lonmodifycourse.pm between versions 1.45 and 1.46

version 1.45, 2009/06/09 13:26:35 version 1.46, 2009/07/31 03:01:31
Line 120  sub print_course_search_page { Line 120  sub print_course_search_page {
                       'instcodefilter','ownerfilter',                        'instcodefilter','ownerfilter',
                       'coursefilter'];                        'coursefilter'];
     my $filter = {};      my $filter = {};
     my $numtitles;      my ($numtitles,$type,$cctitle,$dctitle);
     my $type = 'Course';      $type = $env{'form.type'};
       if (!defined($env{'form.type'})) {
           $type = 'Course';
       }
     my $action = '/adm/modifycourse';      my $action = '/adm/modifycourse';
     my $cctitle = &Apache::lonnet::plaintext('cc',$type);      $cctitle = &Apache::lonnet::plaintext('cc',$type);
     my $dctitle = &Apache::lonnet::plaintext('dc');      $dctitle = &Apache::lonnet::plaintext('dc');
     $r->print(      $r->print(&Apache::lonpickcourse::js_changer());
         '<h3>'.&mt('Search for a course in the [_1] domain',$domdesc).'</h3>'.      if ($type eq 'Course') {
         &mt('Actions available after searching for a course:').'<ul>'.            $r->print(
         '<li>'.&mt('Enter the course with the role of [_1]',$cctitle).'</li>'."\n".              '<h3>'.&mt('Search for a course in the [_1] domain',$domdesc).'</h3>'.
         '<li>'.&mt('View or modify course settings which only a [_1] may modify.'              &mt('Actions available after searching for a course:').'<ul>'.  
                   ,$dctitle).'</li>'."\n".'</ul>');              '<li>'.&mt('Enter the course with the role of [_1]',$cctitle).'</li>'."\n".
               '<li>'.&mt('View or modify course settings which only a [_1] may modify.'
                         ,$dctitle).'</li>'."\n".'</ul>');
       } else {
           $r->print(
               '<h3>'.&mt('Search for a community in the [_1] domain',$domdesc).'</h3>'.
               &mt('Actions available after searching for a community:').'<ul>'.          
               '<li>'.&mt('Enter the community with the role of [_1]',$cctitle).'</li>'."\n".
               '<li>'.&mt('View or modify community settings which only a [_1] may modify.'
                         ,$dctitle).'</li>'."\n".'</ul>');
       }   
     $r->print(&Apache::lonpickcourse::build_filters($filterlist,$type,      $r->print(&Apache::lonpickcourse::build_filters($filterlist,$type,
                              undef,undef,$filter,$action,\$numtitles,'modifycourse'));                               undef,undef,$filter,$action,\$numtitles,'modifycourse'));
 }  }
Line 145  sub print_course_selection_page { Line 158  sub print_course_selection_page {
                       'ownerdomfilter','coursefilter'];                        'ownerdomfilter','coursefilter'];
     my %filter;      my %filter;
     my $type = $env{'form.type'};      my $type = $env{'form.type'};
     if ($type eq '') {      if (!defined($type)) {
         $type = 'Course';          $type = 'Course';
     }      }
     my $action = '/adm/modifycourse';      my $action = '/adm/modifycourse';
     my $dctitle = &Apache::lonnet::plaintext('dc');      my $dctitle = &Apache::lonnet::plaintext('dc');
       my $numtitles;
       $r->print(&Apache::lonpickcourse::js_changer());
     $r->print(&mt('Revise your search criteria for this domain').' ('.$domdesc.').<br /><br />');      $r->print(&mt('Revise your search criteria for this domain').' ('.$domdesc.').<br /><br />');
     $r->print(&Apache::lonpickcourse::build_filters($filterlist,$type,      $r->print(&Apache::lonpickcourse::build_filters($filterlist,$type,
                                        undef,undef,\%filter,$action));                                         undef,undef,\%filter,$action,\$numtitles));
     $filter{'domainfilter'} = $dom;      $filter{'domainfilter'} = $dom;
     my %courses = &Apache::lonpickcourse::search_courses($r,$type,0,      my %courses = &Apache::lonpickcourse::search_courses($r,$type,0,
                                                          \%filter);                                                           \%filter,$numtitles);
     &Apache::lonpickcourse::display_matched_courses($r,$type,0,$action,undef,      &Apache::lonpickcourse::display_matched_courses($r,$type,0,$action,undef,undef,undef,
                                                     %courses);                                                      %courses);
     return;      return;
 }  }
Line 1091  sub course_settings_descrip { Line 1106  sub course_settings_descrip {
   
 sub hidden_form_elements {  sub hidden_form_elements {
     my $hidden_elements =       my $hidden_elements = 
       &Apache::lonhtmlcommon::echo_form_input(['gosearch','coursecode',        &Apache::lonhtmlcommon::echo_form_input(['gosearch','updater','coursecode',
           'prevphase','numlocalcc','courseowner','login','coursequota','intarg',            'prevphase','numlocalcc','courseowner','login','coursequota','intarg',
           'locarg','krbarg','krbver','counter','hidefromcat','usecategory'])."\n".            'locarg','krbarg','krbver','counter','hidefromcat','usecategory'])."\n".
           '<input type="hidden" name="prevphase" value="'.$env{'form.phase'}.'" />';            '<input type="hidden" name="prevphase" value="'.$env{'form.phase'}.'" />';
Line 1114  sub handler { Line 1129  sub handler {
         &Apache::lonhtmlcommon::clear_breadcrumbs();          &Apache::lonhtmlcommon::clear_breadcrumbs();
   
         my $phase = $env{'form.phase'};          my $phase = $env{'form.phase'};
           if ($env{'form.updater'}) {
               $phase = '';
           }
         if ($phase eq '') {          if ($phase eq '') {
             &Apache::lonhtmlcommon::add_breadcrumb              &Apache::lonhtmlcommon::add_breadcrumb
             ({href=>"/adm/modifycourse",              ({href=>"/adm/modifycourse",
Removed from v.1.45  
changed lines
  Added in v.1.46

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