From f67d23202bb229a5b6f8ce8817277b7768941ac2 Mon Sep 17 00:00:00 2001
From: Ricky Elrod <ricky@elrod.me>
Date: Jun 12 2015 23:35:58 +0000
Subject: Enable -Wall, fix hlint warning


Signed-off-by: Ricky Elrod <ricky@elrod.me>

---

diff --git a/pagure-hook-receiver.cabal b/pagure-hook-receiver.cabal
index 20a0353..7947c54 100644
--- a/pagure-hook-receiver.cabal
+++ b/pagure-hook-receiver.cabal
@@ -28,3 +28,4 @@ library
                      , unix >= 2.5 && < 2.8
   hs-source-dirs:      src
   default-language:    Haskell2010
+  ghc-options:         -Wall
diff --git a/src/Web/Pagure/HookReceiver/Post.hs b/src/Web/Pagure/HookReceiver/Post.hs
index 8e926d3..e7fa123 100644
--- a/src/Web/Pagure/HookReceiver/Post.hs
+++ b/src/Web/Pagure/HookReceiver/Post.hs
@@ -20,7 +20,7 @@ import Web.Scotty
 
 runPagureListener :: Int -> M.Map String [String -> IO ()] -> IO ()
 runPagureListener port projectMapping =
-  scotty port $ do
+  scotty port $
     post "/:projectname" $ do
       name <- param "projectname"
       case M.lookup name projectMapping of