builtin-name-rev.c: split deeply nested part from the main function

diff --git a/git-send-email.perl b/git-send-email.perl
index a598fdc890c817875766c29aa714d622af770f4b..385ff7c2197f02207bfa56e2a9b6ec557fbfe0cc 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -209,6 +209,7 @@ sub format_2822_time {
     "bcc" => \@bcclist,
     "aliasesfile" => \@alias_files,
     "suppresscc" => \@suppress_cc,
+    "envelopesender" => \$envelope_sender,
 );
 
 # Handle Uncouth Termination
@@ -441,7 +442,7 @@ sub read_config {
        }
 
        my $to = $_;
-       push @to, split /,/, $to;
+       push @to, split /,\s*/, $to;
        $prompting++;
 }
 
@@ -849,7 +850,7 @@ sub send_message
                                }
                                elsif (/^Content-type:/i) {
                                        $has_content_type = 1;
-                                       if (/charset="?[^ "]+/) {
+                                       if (/charset="?([^ "]+)/) {
                                                $body_encoding = $1;
                                        }
                                        push @xh, $_;