runGH
    :: (MonadBaseControl IO m, MonadIO m)
    => Pool Postgresql
    -> DbPersist Postgresql (NoLoggingT m) a
    -> m a
runGH pool action = undefined
runGH
    :: (MonadBaseControl IO m, MonadIO m)
    => Pool Postgresql
    -> DbPersist Postgresql (NoLoggingT m) a
    -> m a
runGH pool action = undefined
runGH pool action = undefined