Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 36c58ad3

Von Tamino Steinert vor 7 Monaten hinzugefügt

IMAPClient: FIX: gültige Zeichen für Zeichensatzname verwenden

https://www.rfc-editor.org/rfc/rfc2978#section-2.3
   mime-charset = 1*mime-charset-chars
   mime-charset-chars = ALPHA / DIGIT /
               "!" / "#" / "$" / "%" / "&" /
               "'" / "+" / "-" / "^" / "_" /
               "`" / "{" / "}" / "~" 
   ALPHA        = "A".."Z"    ; Case insensitive ASCII Letter
   DIGIT        = "0".."9"    ; Numeric digit

Unterschiede anzeigen:

SL/IMAPClient.pm
257 257 

  		




  258
  258
  
    
  my $email = $params{email};


  		




  259
  259
  
    
  if ($email->content_type) { # decode header


  		




  260
  
  
    
    my $charset = $email->content_type =~ /charset="(.+)"/ ? $1 : undef;


  		




  
  260
  
    
    my $charset = $email->content_type =~ /charset="([A-Z0-9!#$%&'+-^_`{}~]+)"/i ? $1 : undef;


  		




  261
  261
  
    
    if ($charset) {


  		




  262
  262
  
    
      map { $email->header_str_set($_ => decode($charset, $email->header($_))) }


  		




  263
  263
  
    
        $email->header_names;


  		












Auch abrufbar als:  Unified diff