Fix build with bytestring >= 0.10.8

2016-05-09 18:17:33 +02:00
parent 14b48515a2
commit a83e96259f
1 changed files with 4 additions and 0 deletions
--- a/src/HPath.hs
+++ b/src/HPath.hs
@@ -52,7 +52,11 @@ module HPath

 import           Control.Exception (Exception)
 import           Control.Monad.Catch (MonadThrow(..))
+#if MIN_VERSION_bytestring(0,10,8)
+import           Data.ByteString(ByteString, stripPrefix)
+#else
 import           Data.ByteString(ByteString)
+#endif
 import qualified Data.ByteString as BS
 import           Data.Data
 import qualified Data.List as L