haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Updated and fixed Heroku Procfile instructions

Browse Source
This commit is contained in:
Jan Ahrens 2012-06-28 00:11:50 +03:00 committed by Jan Ahrens
parent 9df0dd0212
commit 3fc643e0ba
1 changed files with 7 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
yesod/scaffold/deploy/Procfile.cg
View File

@ -15,18 +15,21 @@
# #
# Postgresql Yesod setup: # Postgresql Yesod setup:
# #
# * add a dependency on the "heroku" package in your cabal file # * add dependencies on the "heroku", "aeson" and "unordered-containers" packages in your cabal file
# #
# * add code in Application.hs to use the heroku package and load the connection parameters. # * add code in Application.hs to use the heroku package and load the connection parameters.
# The below works for Postgresql. # The below works for Postgresql.
# #
# import Data.HashMap.Strict as H
# import Data.Aeson.Types as AT
# #ifndef DEVELOPMENT # #ifndef DEVELOPMENT
# import qualified Web.Heroku # import qualified Web.Heroku
# #endif # #endif
# #
# #
# makeApplication :: AppConfig DefaultEnv Extra -> Logger -> IO Application #
# makeApplication conf logger = do # makeFoundation :: AppConfig DefaultEnv Extra -> Logger -> IO App
# makeFoundation conf setLogger = do
# manager <- newManager def # manager <- newManager def
# s <- staticSite # s <- staticSite
# hconfig <- loadHerokuConfig # hconfig <- loadHerokuConfig
@ -35,17 +38,7 @@
# Database.Persist.Store.applyEnv # Database.Persist.Store.applyEnv
# p <- Database.Persist.Store.createPoolConfig (dbconf :: Settings.PersistConfig) # p <- Database.Persist.Store.createPoolConfig (dbconf :: Settings.PersistConfig)
# Database.Persist.Store.runPool dbconf (runMigration migrateAll) p # Database.Persist.Store.runPool dbconf (runMigration migrateAll) p
# let foundation = ~sitearg~ conf setLogger s p manager dbconf # return $ App conf setLogger s p manager dbconf
# app <- toWaiAppPlain foundation
# return $ logWare app
# where
##ifdef DEVELOPMENT
# logWare = logCallbackDev (logBS setLogger)
# setLogger = logger
##else
# setLogger = toProduction logger -- by default the logger is set for development
# logWare = logCallback (logBS setLogger)
##endif
# #
# #ifndef DEVELOPMENT # #ifndef DEVELOPMENT
# canonicalizeKey :: (Text, val) -> (Text, val) # canonicalizeKey :: (Text, val) -> (Text, val)