commit 49f73852c80ee681c179ee2eb76b1a792d7b1b22
author Ævar Arnfjörð Bjarmason <avarab@gmail.com> Thu Sep 30 13:43:05 2010 +0000
committer Junio C Hamano <gitster@pobox.com> Thu Sep 30 13:06:42 2010 -0700
tree d12981738d8d01685bde5801c409c91f239909eb
parent 41ae8f1d6cf70f32328c984cdbe51d0f156cd501

send-email: is_rfc2047_quoted use qr// regexes

Signed-off-by: Ævar Arnfjörð Bjarmason <avarab@gmail.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>

git-send-email.perl

diff --git a/git-send-email.perl b/git-send-email.perl
index 036e4b4..1890409 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -852,8 +852,8 @@
 
 sub is_rfc2047_quoted {
 	my $s = shift;
-	my $token = '[^][()<>@,;:"\/?.= \000-\037\177-\377]+';
-	my $encoded_text = '[!->@-~]+';
+	my $token = qr/[^][()<>@,;:"\/?.= \000-\037\177-\377]+/;
+	my $encoded_text = qr/[!->@-~]+/;
 	length($s) <= 75 &&
 	$s =~ m/^(?:"[[:ascii:]]*"|=\?$token\?$token\?$encoded_text\?=)$/o;
 }