database-migrate 0.1.0 → 0.1.1
raw patch · 2 files changed
+4/−4 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Paths_database_migrate: getBinDir :: IO FilePath
- Paths_database_migrate: getDataDir :: IO FilePath
- Paths_database_migrate: getDataFileName :: FilePath -> IO FilePath
- Paths_database_migrate: getLibDir :: IO FilePath
- Paths_database_migrate: getLibexecDir :: IO FilePath
- Paths_database_migrate: version :: Version
Files
database-migrate.cabal view
@@ -1,5 +1,5 @@ Name: database-migrate-Version: 0.1.0+Version: 0.1.1 License: BSD3 License-File: LICENSE Author: Mark Hibberd <mark@hibberd.id.au>
src/Database/Migrate/Main.hs view
@@ -2,7 +2,7 @@ {-# OPTIONS_GHC -fno-warn-missing-signatures #-} module Database.Migrate.Main (defaultMain, defaultMain') where -import qualified Paths_database_migrate as Program (version)+--import qualified Paths_database_migrate as Program (version) import Control.Monad import Control.Monad.Trans.Either@@ -12,7 +12,7 @@ import qualified Data.Text as T import Data.Maybe-import Data.Version (showVersion)+--import Data.Version (showVersion) import Database.Migrate.Data import Database.Migrate.Kernel@@ -109,7 +109,7 @@ let db = if adry args then dryrun db' else db' in case adbmode args of HelpMode -> mapM_ putStrLn usage- VersionMode -> putStrLn $ "migrate " ++ showVersion Program.version+ VersionMode -> putStrLn $ "migrate 0.1.1" -- ++ showVersion Program.version MigrateMode -> connector >>= \c -> (executeMigrate migrationstore c $ migrate db) >>= print UpMode -> connector >>= \c -> (executeMigrate migrationstore c $ upmode db) >>= print DownMode -> connector >>= \c -> (executeMigrate migrationstore c $ downmode db) >>= print