App.hs refactor

2015-11-16 12:26:55 +02:00
parent 75646247f2
commit 0c3545fa09
3 changed files with 104 additions and 105 deletions
@@ -218,7 +218,8 @@ spec = afterAll_ resetDb $ around withApp $ do
  describe "Putting record" $ do

    context "to unkonwn uri" $
-      it "gives a 404" $
+      it "gives a 404" $ do
+        pendingWith "Decide on PUT usefullness"
        request methodPut "/fake" []
          [json| { "real": false } |]
            `shouldRespondWith` 404