@@ -118,9 +118,12 @@ withGhciScript pkgs f = do
118 putLog Warning $ T.pack $ "Failed to find pkgs in " <> intercalate ", " pkgDirErrs
118 putLog Warning $ T.pack $ "Failed to find pkgs in " <> intercalate ", " pkgDirErrs
120 let extensions = packageInfos >>= _cabalPackageInfo_defaultExtensions
120 let extensions = packageInfos >>= _cabalPackageInfo_defaultExtensions
121+ extensionsLine = if extensions == mempty
123+ else ":set " <> intercalate " " ((("-X" <>) . prettyShow) <$> extensions)
121− dotGhci = unlines
124+ dotGhci = unlines $
122 [ ":set -i" <> intercalate ":" (packageInfos >>= rootedSourceDirs)
125 [ ":set -i" <> intercalate ":" (packageInfos >>= rootedSourceDirs)
123− , ":set " <> intercalate " " ((("-X" <>) . prettyShow) <$> extensions)
126+ , extensionsLine
124 , ":load Backend Frontend"
127 , ":load Backend Frontend"
125 , "import Obelisk.Run"
128 , "import Obelisk.Run"
126 , "import qualified Frontend"
129 , "import qualified Frontend"