Fix compilation

mgsloan · mgsloan · commit 8ba673f3657c · 2018-05-28T22:42:40.000-07:00
diff --git a/src/Stack/GhcPkg.hs b/src/Stack/GhcPkg.hs
@@ -72,7 +72,7 @@ ghcPkg wc pkgDbs args = do
       Right _ -> return eres
   where
     go = tryAny
-       $ BL.toStrict
+       $ BL.toStrict . fst
      <$> proc (ghcPkgExeName wc) args' readProcess_
     args' = packageDbFlags pkgDbs ++ args
 
