@@ -157,7 +157,7 @@ statusOK = status200
158-- | Created
158-- | Created
159status201, statusCreated :: Status
159status201, statusCreated :: Status
160−status201 = Status 200 $ B8.pack "Created"
160+status201 = Status 201 $ B8.pack "Created"
161statusCreated = status201
161statusCreated = status201
163-- | Moved Permanently
163-- | Moved Permanently