See https://github.com/yesodweb/yesod-scaffold/pull/15 Todo: - Add ThreadId to prevent race condition.