From d77e262915d5726dc48549e3e7ea25c89e675475 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Gr=C3=B6ber?= <dxld@darkboxed.org>
Date: Tue, 19 Jan 2016 20:57:05 +0100
Subject: [PATCH] Remove dependency on Safe from Setup.hs

---
 Setup.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/Setup.hs b/Setup.hs
index 00db893..2e76de4 100755
--- a/Setup.hs
+++ b/Setup.hs
@@ -8,7 +8,6 @@ import Distribution.Simple.InstallDirs as ID
 import Distribution.Simple.LocalBuildInfo
 import Distribution.PackageDescription
 
-import Safe
 import Control.Arrow
 import Control.Applicative
 import Control.Monad
@@ -142,6 +141,10 @@ parseVer str =
       [(ver, _)] -> ver
       _ -> error $ "No parse (Ver) :(\n" ++ str ++ "\n"
 
+fromJustNote :: String -> Maybe a -> a
+fromJustNote _ (Just x) = x
+fromJustNote note Nothing = error $ "fromJustNote ("++note++"): "
+
 -- sanityCheckCabalVersions args cf desc lbi = do
 --   (cabalInstallVer, cabalVer) <- getCabalExecVer