From 8ec8da0491ad89604700b3e29a227966f6d84ba1 Mon Sep 17 00:00:00 2001
From: Perl Tidy <perltidy@bugzilla.org>
Date: Wed, 5 Dec 2018 15:38:52 -0500
Subject: no bug - reformat all the code using the new perltidy rules

---
 scripts/sendmail.pl | 23 ++++++++++++++---------
 1 file changed, 14 insertions(+), 9 deletions(-)

(limited to 'scripts/sendmail.pl')

diff --git a/scripts/sendmail.pl b/scripts/sendmail.pl
index aa9ab57a1..adf22a907 100755
--- a/scripts/sendmail.pl
+++ b/scripts/sendmail.pl
@@ -18,12 +18,17 @@ use warnings;
 
 use File::Basename;
 use File::Spec;
+
 BEGIN {
-    require lib;
-    my $dir = File::Spec->rel2abs(dirname(__FILE__));
-    my $base = File::Spec->catdir($dir, "..");
-    lib->import($base, File::Spec->catdir($base, "lib"), File::Spec->catdir($base, qw(local lib perl5)));
-    chdir $base;
+  require lib;
+  my $dir = File::Spec->rel2abs(dirname(__FILE__));
+  my $base = File::Spec->catdir($dir, "..");
+  lib->import(
+    $base,
+    File::Spec->catdir($base, "lib"),
+    File::Spec->catdir($base, qw(local lib perl5))
+  );
+  chdir $base;
 }
 
 use Bugzilla;
@@ -31,9 +36,9 @@ BEGIN { Bugzilla->extensions }
 use Bugzilla::Mailer;
 
 my $msg = do {
-    local $/ = undef;
-    binmode STDIN, ':bytes';
-    <STDIN>;
+  local $/ = undef;
+  binmode STDIN, ':bytes';
+  <STDIN>;
 };
 
-MessageToMTA($msg);
\ No newline at end of file
+MessageToMTA($msg);
-- 
cgit v1.2.3-24-g4f1b