module Main where

import Lib
import Data.Maybe
import System.Environment

main :: IO ()
main = do
  dbFile <- lookupEnv "TUTOR_DATABASE"
  startApp (fromMaybe "tutor.db" dbFile)