@@ -95,7 +95,6 @@ edit p n (Deployment _ _ e) = do
9595 withResource p $ \conn ->
9696 execute conn "UPDATE deployments SET envs = ?, updated_at = now() WHERE name = ?" (unwords e, n)
9797
98−
9998destroy :: PgPool -> Text -> Handler Text
10099destroy p n = do
101100 deleteDeployment
@@ -108,7 +107,6 @@ destroy p n = do
108107 withResource p $ \conn ->
109108 execute conn "DELETE FROM deployments WHERE name = ?" (Only n)
110109
111−
112110update :: PgPool -> Text -> Deployment -> Handler Text
113111update p n (Deployment _ t _) = do
114112 updateDeployment