Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 36c58ad3

Von Tamino Steinert vor 8 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