File tree Expand file tree Collapse file tree 2 files changed +3
-5
lines changed Expand file tree Collapse file tree 2 files changed +3
-5
lines changed Original file line number Diff line number Diff line change 2
2
cabal :
3
3
- path : " src"
4
4
component : " lib:implicit-hie"
5
-
5
+
6
6
- path : " app/Main.hs"
7
7
component : " implicit-hie:exe:gen-hie"
8
-
8
+
9
9
- path : " test"
10
10
component : " implicit-hie:test:implicit-hie-test"
11
-
Original file line number Diff line number Diff line change @@ -26,7 +26,6 @@ import Hie.Yaml
26
26
import System.Directory
27
27
import System.FilePath.Posix
28
28
import System.FilePattern.Directory (getDirectoryFiles )
29
- import Debug.Trace
30
29
31
30
newtype Pkgs = Pkgs [FilePath ]
32
31
deriving (Eq , Ord )
@@ -50,7 +49,7 @@ cabalPkgs p = do
50
49
[] -> fail " no cabal files found"
51
50
h : _ -> pure [p </> h]
52
51
xs -> do
53
- cd <- liftIO $ map (p </> ) <$> getDirectoryFiles p (map (matchDirs . traceShowId . T. unpack) xs)
52
+ cd <- liftIO $ map (p </> ) <$> getDirectoryFiles p (map (matchDirs . T. unpack) xs)
54
53
cf <-
55
54
liftIO $
56
55
mapM (\ p -> if takeExtension p == " .cabal" then pure [p] else cfs p) cd
You can’t perform that action at this time.
0 commit comments