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

Diff for /loncom/interface/lonpreferences.pm between versions 1.55 and 1.56

version 1.55, 2005/02/25 06:48:00 version 1.56, 2005/02/26 05:37:23
Line 190  sub texenginechanger { Line 190  sub texenginechanger {
     my $pref=&mt('Preferred method to display Math');      my $pref=&mt('Preferred method to display Math');
     my %mathchoices=('' => 'No Preference',      my %mathchoices=('' => 'No Preference',
      'tth' => 'TeX to HTML',       'tth' => 'TeX to HTML',
      #'ttm' => 'TeX to MathML',       'ttm' => 'TeX to MathML',
      'jsMath' => 'jsMath',       'jsMath' => 'jsMath',
      #'mimetex' => 'Convert to Images'       #'mimetex' => 'Convert to Images'
                      );                       );
Line 245  sub verify_and_change_texengine { Line 245  sub verify_and_change_texengine {
 # Screenname  # Screenname
     my $newtexengine  = $ENV{'form.texengine'};      my $newtexengine  = $ENV{'form.texengine'};
     $newtexengine=~s/[^\-\w]//g;      $newtexengine=~s/[^\-\w]//g;
       if ($newtexengine eq 'ttm') {
    &Apache::lonnet::appenv('browser.mathml' => 1);
       } else {
    if ($ENV{'environment.texengine'} eq 'ttm') {
       &Apache::lonnet::appenv('browser.mathml' => 0);
    }
       }
     my $message='';      my $message='';
     if ($newtexengine) {      if ($newtexengine) {
         &Apache::lonnet::put('environment',{'texengine' => $newtexengine});          &Apache::lonnet::put('environment',{'texengine' => $newtexengine});
Line 255  sub verify_and_change_texengine { Line 262  sub verify_and_change_texengine {
         &Apache::lonnet::delenv('environment\.texengine');          &Apache::lonnet::delenv('environment\.texengine');
         $message='Reset preferred math display.';          $message='Reset preferred math display.';
     }      }
   
   
     $r->print(<<ENDVCSCREEN);      $r->print(<<ENDVCSCREEN);
 </p>  </p>
 $message  $message
Removed from v.1.55  
changed lines
  Added in v.1.56

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