diff --git a/src/PostgREST/Listener.hs b/src/PostgREST/Listener.hs index 4d4af1f2f..25ba02027 100644 --- a/src/PostgREST/Listener.hs +++ b/src/PostgREST/Listener.hs @@ -56,7 +56,7 @@ retryingListen appState hasDbListenerBug = do -- loop running the listener retryingListen appState (isDbListenerBug err) - -- Execute the listener with with error handling + -- Execute the listener with error handling handle onError $ do -- Make sure we don't leak connections on errors bracket diff --git a/src/PostgREST/Plan.hs b/src/PostgREST/Plan.hs index 004633e23..bb7a0d4a1 100644 --- a/src/PostgREST/Plan.hs +++ b/src/PostgREST/Plan.hs @@ -126,7 +126,7 @@ data InspectPlan = InspectPlan { , ipSchema :: Schema } --- A Plan may use the the database or not +-- A Plan may use the database or not data ActionPlan = Db DbActionPlan | NoDb InfoPlan