diff --git a/app/Config/Config.hs b/app/Config/Config.hs index 41d63fe..1536616 100644 --- a/app/Config/Config.hs +++ b/app/Config/Config.hs @@ -6,6 +6,7 @@ import qualified Antelude.List.NonEmpty as NE import qualified Antelude.Maybe as Maybe import qualified Antelude.Tuple.Pair as Pair import Control.Applicative +import qualified Data.List.NonEmpty as UnsafeNE import qualified Data.Map.Strict as Map import qualified Data.Text as Text import qualified Data.Version as Version @@ -117,16 +118,7 @@ parseTableAsNEList = (\mp -> Map.toList mp |> List.map Pair.second - |> NE.fromList - |> Maybe.withDefault - (NE.singleton - <| Python - <| PythonConfig.LangConf - { PythonConfig.langWriter = PythonWrite.pythonWriter - , PythonConfig.outputLocation = "/dev/null" - , PythonConfig.langVersion = Version.Version {Version.versionBranch = [0]} - } - ) + |> UnsafeNE.fromList ) @@ -169,4 +161,3 @@ runLangWriter (Python cnf) = PythonConfig.langWriter cnf cnf runLangWriter (Haskell cnf) = HaskellConfig.langWriter cnf cnf runLangWriter (Elm cnf) = ElmConfig.langWriter cnf cnf runLangWriter (Gleam cnf) = GleamConfig.langWriter cnf cnf -