send-email: get rid of indirect object syntax

Change indirect object syntax such as "new X ARGS" to
"X->new(ARGS)". This allows perl to see what "new" is at compile-time
without having loaded Term::ReadLine. This doesn't matter now, but
will in a subsequent commit when we start lazily loading it.

Let's do the same for the adjacent "FakeTerm" package for consistency,
even though we're not going to conditionally load it.

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

diff --git a/git-send-email.perl b/git-send-email.perl
index 44dc3f6eb10fec3ec468d57574d53397071bb87b..cc1027d8774b88385d81a7f52cd5988a4d762b97 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -194,11 +194,11 @@ my $repo = eval { Git->repository() };
 my @repo = $repo ? ($repo) : ();
 my $term = eval {
        $ENV{"GIT_SEND_EMAIL_NOTTY"}
-               ? new Term::ReadLine 'git-send-email', \*STDIN, \*STDOUT
-               : new Term::ReadLine 'git-send-email';
+               ? Term::ReadLine->new('git-send-email', \*STDIN, \*STDOUT)
+               : Term::ReadLine->new('git-send-email');
 };
 if ($@) {
-       $term = new FakeTerm "$@: going non-interactive";
+       $term = FakeTerm->new("$@: going non-interactive");
 }
 
 # Behavior modification variables