Diff for /loncom/localize/lonlocal.pm between versions 1.31 and 1.33

version 1.31, 2004/02/18 23:33:17 version 1.33, 2005/04/18 22:17:45
Line 206  sub current_language { Line 206  sub current_language {
 # ============================================================== What encoding?  # ============================================================== What encoding?
   
 sub current_encoding {  sub current_encoding {
       my $default='UTF-8';
       if ($Apache::lonnet::env{'browser.os'} eq 'win' && 
    $Apache::lonnet::env{'browser.type'} eq 'explorer') {
           $default=undef;
       }
     if ($lh) {      if ($lh) {
  my $enc=$lh->maketext('char_encoding');   my $enc=$lh->maketext('char_encoding');
  return ($enc eq 'char_encoding'?'':$enc);   return ($enc eq 'char_encoding'?$default:$enc);
     } else {      } else {
  return undef;   return $default;
     }      }
 }  }
   

Removed from v.1.31  
changed lines
  Added in v.1.33


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