10 lines
179 B
Haskell
10 lines
179 B
Haskell
module Main where
|
|
|
|
import Lib
|
|
import Data.Maybe
|
|
import System.Environment
|
|
|
|
main :: IO ()
|
|
main = do
|
|
dbFile <- lookupEnv "TUTOR_DATABASE"
|
|
startApp (fromMaybe "tutor.db" dbFile)
|