diff options
| author | Gregor Kleen <gkleen@yggdrasil.li> | 2017-03-10 01:13:25 +0100 |
|---|---|---|
| committer | Gregor Kleen <gkleen@yggdrasil.li> | 2017-03-10 01:13:25 +0100 |
| commit | 0eeb4d561ab478747d721db4a0f015b7b976fb32 (patch) | |
| tree | 9d2f937273e70576e4e7ae52bd5cde128558b67e | |
| parent | 0fb12fb1b1f56df29e21f47d0560abb696d82fcf (diff) | |
| download | nixos-0eeb4d561ab478747d721db4a0f015b7b976fb32.tar nixos-0eeb4d561ab478747d721db4a0f015b7b976fb32.tar.gz nixos-0eeb4d561ab478747d721db4a0f015b7b976fb32.tar.bz2 nixos-0eeb4d561ab478747d721db4a0f015b7b976fb32.tar.xz nixos-0eeb4d561ab478747d721db4a0f015b7b976fb32.zip | |
Run migration
| -rwxr-xr-x | bragi/bar.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/bragi/bar.hs b/bragi/bar.hs index 43e1306b..067e5af4 100755 --- a/bragi/bar.hs +++ b/bragi/bar.hs | |||
| @@ -69,6 +69,7 @@ instance YesodPersist BarInventory where | |||
| 69 | 69 | ||
| 70 | main = runStderrLoggingT . withPostgresqlPool "" 5 . runReaderT $ do | 70 | main = runStderrLoggingT . withPostgresqlPool "" 5 . runReaderT $ do |
| 71 | sqlPool <- ask | 71 | sqlPool <- ask |
| 72 | mapM_ ($(logWarnS) "DB") =<< runSqlPool (runMigrationSilent migrateAll) sqlPool | ||
| 72 | liftIO . warpEnv $ BarInventory{..} | 73 | liftIO . warpEnv $ BarInventory{..} |
| 73 | 74 | ||
| 74 | 75 | ||