From 48bd0f3e0c7ba88164eefb6ba20b785b4fb660bc Mon Sep 17 00:00:00 2001
From: Jonathan Hall <jhall@efolder.net>
Date: Tue, 16 Sep 2014 07:11:54 -0500
Subject: [PATCH] Kill some tab characters; and adopt PBP-suggested formatting
 for :? operator.

---
 lib/Qpsmtpd/Base.pm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/lib/Qpsmtpd/Base.pm b/lib/Qpsmtpd/Base.pm
index 016e54a..b07835b 100644
--- a/lib/Qpsmtpd/Base.pm
+++ b/lib/Qpsmtpd/Base.pm
@@ -9,11 +9,10 @@ sub new {
 
 sub tildeexp {
     my ($self, $path) = @_;
-    $path =~ s{^~([^/]*)} {  
-	  $1
-	      ? (getpwnam($1))[7] 
-	      : ( $ENV{HOME} || $ENV{LOGDIR} || (getpwuid($>))[7])
-	  }ex;
+    $path =~ s{^~([^/]*)} {
+        $1  ? (getpwnam($1))[7]
+            : ( $ENV{HOME} || $ENV{LOGDIR} || (getpwuid($>))[7])
+    }ex;
     return $path;
 }