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

Diff for /loncom/interface/lonpreferences.pm between versions 1.200 and 1.203

version 1.200, 2012/10/08 10:26:34 version 1.203, 2013/01/18 12:58:42
Line 159  sub languagechanger { Line 159  sub languagechanger {
     my $language=$userenv{'languages'};      my $language=$userenv{'languages'};
   
     my $pref=&mt('Preferred language');      my $pref=&mt('Preferred language');
     my %langchoices=('' => 'No language preference');      my %langchoices=('' => &mt('No language preference'));
     foreach (&Apache::loncommon::languageids()) {      foreach (&Apache::loncommon::languageids()) {
  if (&Apache::loncommon::supportedlanguagecode($_)) {   if (&Apache::loncommon::supportedlanguagecode($_)) {
     $langchoices{&Apache::loncommon::supportedlanguagecode($_)}      $langchoices{&Apache::loncommon::supportedlanguagecode($_)}
Line 457  $options.' Line 457  $options.'
         $r->print('<div class="LC_left_float">          $r->print('<div class="LC_left_float">
 <h4>'.&mt('Freeze Roles').'</h4>  <h4>'.&mt('Freeze Roles').'</h4>
 <p>'.&mt('The table below can be used to [_1]freeze[_2] '.$lc_role.'s in the Hotlist.','<q>','</q>').'<br />'.  <p>'.&mt('The table below can be used to [_1]freeze[_2] '.$lc_role.'s in the Hotlist.','<q>','</q>').'<br />'.
 &mt('Those marked frozen will not be removed from the list, even if not recently used.').'  &mt('Those '.$lc_role.'s marked frozen will not be removed from the list, even if not recently used.').'
 </p>  </p>
 '.$roles_check_list.'  '.$roles_check_list.'
 </div>');  </div>');
Line 1238  sub colorschanger { Line 1238  sub colorschanger {
     my $resetbutton = &mt('Reset All');      my $resetbutton = &mt('Reset All');
     my $resetbuttondesc = &mt('Reset All Colors to Default');      my $resetbuttondesc = &mt('Reset All Colors to Default');
     my $colorchooser=&Apache::lonhtmlcommon::color_picker();      my $colorchooser=&Apache::lonhtmlcommon::color_picker();
     $r-print('<script type="text/javascript" language="JavaScript">      $r->print('<script type="text/javascript" language="JavaScript">
 ' . $colorchooser . '  ' . $colorchooser . '
 </script>  </script>
 ');  ');
Removed from v.1.200  
changed lines
  Added in v.1.203

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