app :: Config ->  App ()
app config = do
  let env = getEnv config
  middleware (getLogger env)
  defaultHandler (getHandler env)
  
  get       "/courses"          getCourses
  get       "/courses/:program" getCoursesByProgram
  get       "/course/:code"     getCourse
  notFound                      fourOhFour
app :: Config ->  App ()
app config = do
  let env = getEnv config
  middleware (getLogger env)
  defaultHandler (getHandler env)
  
  get       "/courses"          getCourses
  get       "/courses/:program" getCoursesByProgram
  get       "/course/:code"     getCourse
  notFound                      fourOhFour
app config = do
  let env = getEnv config
  middleware (getLogger env)
  defaultHandler (getHandler env)
  
  get       "/courses"          getCourses
  get       "/courses/:program" getCoursesByProgram
  get       "/course/:code"     getCourse
  notFound                      fourOhFour