on master help sign in
Merge pull request #751 from Melvar/setup-hs-catch

Fix import clash in Setup.hs

commit97e39caa070cbf87101a9d7d76a490a5f54c6072 authorEdwin Brady <edwin.brady@gmail.com> dateSun 22 Dec 2013, 07:17 (13 years ago) parent0e03531edbb52f
1 file changed+1−1
Setup.hs+1−1
Setup.hs+1−1
@@ -106,7 +106,7 @@ idrisConfigure _ flags _ local = do
106106 -- Put the Git hash into a module for use in the program
107107 -- For release builds, just put the empty string in the module
108108 generateVersionModule = do
109− gitHash <- catch (readProcess "git" ["rev-parse", "--short", "HEAD"] "")
109+ gitHash <- Control.Exception.catch (readProcess "git" ["rev-parse", "--short", "HEAD"] "")
110110 (\e -> let e' = (e :: SomeException) in return "PRE")
111111 let hash = takeWhile (/= '\n') gitHash
112112 let versionModulePath = autogenModulesDir local </> "Version_idris" Px.<.> "hs"