loadHTML :: String -> IO (Maybe Template)
loadHTML filename = do
  compiled <- automaticCompile [".", "./dist"] filename
  return $ case compiled of
    Left err -> Nothing
    Right template -> Just template
loadHTML :: String -> IO (Maybe Template)
loadHTML filename = do
  compiled <- automaticCompile [".", "./dist"] filename
  return $ case compiled of
    Left err -> Nothing
    Right template -> Just template
loadHTML filename = do
  compiled <- automaticCompile [".", "./dist"] filename
  return $ case compiled of
    Left err -> Nothing
    Right template -> Just template