Fix typo in the postgres yaml name

This commit is contained in:
patrick brisbin 2011-09-11 15:12:06 -04:00
parent 2aa6f989a6
commit b9bc2ee1c5

View File

@ -53,7 +53,7 @@ loadConfig env = do
loadPostgresqlConnStr :: AppEnvironment -> IO Text
loadPostgresqlConnStr env = do
allSettings <- (join $ YAML.decodeFile ("config/postgesql.yml" :: String)) >>= fromMapping
allSettings <- (join $ YAML.decodeFile ("config/postgresql.yml" :: String)) >>= fromMapping
settings <- lookupMapping (show env) allSettings
database <- lookupScalar "database" settings :: IO Text