From b794a576b70ce5d0e81d34eb66b142df1bc8fd71 Mon Sep 17 00:00:00 2001
From: Avi Dessauer <avi.the.coder@gmail.com>
Date: Tue, 12 May 2020 19:21:04 -0400
Subject: [PATCH] Remove Debug.Trace

---
 hie.yaml          | 5 ++---
 src/Hie/Locate.hs | 3 +--
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/hie.yaml b/hie.yaml
index b15cf37..683f137 100644
--- a/hie.yaml
+++ b/hie.yaml
@@ -2,10 +2,9 @@ cradle:
   cabal:
     - path: "src"
       component: "lib:implicit-hie"
-    
+
     - path: "app/Main.hs"
       component: "implicit-hie:exe:gen-hie"
-    
+
     - path: "test"
       component: "implicit-hie:test:implicit-hie-test"
-    
diff --git a/src/Hie/Locate.hs b/src/Hie/Locate.hs
index c902355..c5bd501 100644
--- a/src/Hie/Locate.hs
+++ b/src/Hie/Locate.hs
@@ -26,7 +26,6 @@ import Hie.Yaml
 import System.Directory
 import System.FilePath.Posix
 import System.FilePattern.Directory (getDirectoryFiles)
-import Debug.Trace
 
 newtype Pkgs = Pkgs [FilePath]
   deriving (Eq, Ord)
@@ -50,7 +49,7 @@ cabalPkgs p = do
       [] -> fail "no cabal files found"
       h : _ -> pure [p </> h]
     xs -> do
-      cd <- liftIO $ map (p </>) <$> getDirectoryFiles p (map (matchDirs . traceShowId . T.unpack) xs)
+      cd <- liftIO $ map (p </>) <$> getDirectoryFiles p (map (matchDirs . T.unpack) xs)
       cf <-
         liftIO $
           mapM (\p -> if takeExtension p == ".cabal" then pure [p] else cfs p) cd