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

Diff for /loncom/interface/lonconfigsettings.pm between versions 1.17 and 1.18

version 1.17, 2011/01/13 22:49:47 version 1.18, 2011/03/31 15:35:54
Line 120  $jscript Line 120  $jscript
     }      }
     $r->print(&Apache::loncommon::start_page($pagetitle,$js,$additem));      $r->print(&Apache::loncommon::start_page($pagetitle,$js,$additem));
     $r->print(&Apache::lonhtmlcommon::breadcrumbs($brcrumtitle));      $r->print(&Apache::lonhtmlcommon::breadcrumbs($brcrumtitle));
     &Apache::lonparmset::startSettingsScreen($r,'coursepref');      if ($context eq 'course') {
           &Apache::lonparmset::startSettingsScreen($r,'coursepref');
       }
     $r->print('      $r->print('
 <form name="parmform" action="">  <form name="parmform" action="">
 <input type="hidden" name="pres_marker" />  <input type="hidden" name="pres_marker" />
Line 134  $jscript Line 136  $jscript
 }  }
   
 sub print_footer {  sub print_footer {
     my ($r,$phase,$newphase,$button_text,$actions) = @_;      my ($r,$context,$phase,$newphase,$button_text,$actions) = @_;
     $button_text = &mt($button_text);      $button_text = &mt($button_text);
     $r->print('<input type="hidden" name="phase" value="" />');      $r->print('<input type="hidden" name="phase" value="" />');
     if (defined($env{'form.origin'})) {      if (defined($env{'form.origin'})) {
Line 162  sub print_footer { Line 164  sub print_footer {
     }      }
     if ($phase eq 'process') {      if ($phase eq 'process') {
         $r->print('</form>');          $r->print('</form>');
         &Apache::lonparmset::endSettingsScreen($r);          if ($context eq 'course') {
               &Apache::lonparmset::endSettingsScreen($r);
           }
         $r->print(&Apache::loncommon::end_page());          $r->print(&Apache::loncommon::end_page());
     }      }
     return;      return;
Line 233  sub make_changes { Line 237  sub make_changes {
     if ($context eq 'course') {      if ($context eq 'course') {
         $footer_text = 'Back to display/edit settings';           $footer_text = 'Back to display/edit settings'; 
     }      }
     &print_footer($r,$phase,'display',$footer_text,\@actions);      &print_footer($r,$context,$phase,'display',$footer_text,\@actions);
     $r->print('</p>');      $r->print('</p>');
 }  }
   
Line 278  sub display_settings { Line 282  sub display_settings {
                 $r->print($output{$items[$i]});                  $r->print($output{$items[$i]});
             }              }
             $r->print('</div>');              $r->print('</div>');
             $r->print(&print_footer($r,$phase,'process','Save Changes',\@actions));              $r->print(&print_footer($r,$context,$phase,'process','Save Changes',\@actions));
         } else {          } else {
             $r->print('<input type="hidden" name="phase" value="" />'.              $r->print('<input type="hidden" name="phase" value="" />'.
                       '<span class="LC_error">'.&mt('No settings chosen').                        '<span class="LC_error">'.&mt('No settings chosen').
Line 368  sub display_choices { Line 372  sub display_choices {
         }          }
         $r->print('</div><br clear="all" />');          $r->print('</div><br clear="all" />');
     }      }
     $r->print(&print_footer($r,$phase,'display','Display'));      $r->print(&print_footer($r,$context,$phase,'display','Display'));
     $r->print('</form>');      $r->print('</form>');
     $r->print(&Apache::loncommon::end_page());      $r->print(&Apache::loncommon::end_page());
     return;      return;
Removed from v.1.17  
changed lines
  Added in v.1.18

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