@@ -154,7 +154,9 @@ withGhciScript pkgs f = do
154154 putLog Warning $ T.pack $ "Failed to find pkgs in " <> intercalate ", " pkgDirErrs
155155
156156 let extensions = packageInfos >>= _cabalPackageInfo_defaultExtensions
157− language = L.nub $ mapMaybe _cabalPackageInfo_defaultLanguage packageInfos
157+ languageFromPkgs = L.nub $ mapMaybe _cabalPackageInfo_defaultLanguage packageInfos
158+ -- NOTE when no default-language is present cabal sets Haskell98
159+ language = NE.toList $ fromMaybe (Haskell98 NE.:| []) $ NE.nonEmpty languageFromPkgs
158160 extensionsLine = if extensions == mempty
159161 then ""
160162 else ":set " <> intercalate " " ((("-X" <>) . prettyShow) <$> extensions)