remove dangling where clause

diff --git a/Remote/S3.hs b/Remote/S3.hs
index ab9f5d2ab02859bb602f91dc8550c66690176304..2bf78378c48990d5a0dd1281b6fd8305b14d834e 100644 (file)
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -531,7 +531,6 @@ removeExportS3 hv r rs info k loc = withS3Handle hv $ \case
                                S3.DeleteObject (T.pack $ bucketExportLocation info loc) (bucket info)
                        return ()
        Left p -> giveupS3HandleProblem p (uuid r)
-  where
 
 checkPresentExportS3 :: S3HandleVar -> Remote -> S3Info -> Key -> ExportLocation -> Annex Bool
 checkPresentExportS3 hv r info k loc = withS3Handle hv $ \case