From edf99c36d2aa8cd7311234d1f134d2b8db246ac0 Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
Date: Wed, 19 Jun 2019 00:49:10 +0200
Subject: Fix redundant case warning

---
 src/CabalHelper/Shared/Common.hs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/CabalHelper')

diff --git a/src/CabalHelper/Shared/Common.hs b/src/CabalHelper/Shared/Common.hs
index d65722b..031adcf 100644
--- a/src/CabalHelper/Shared/Common.hs
+++ b/src/CabalHelper/Shared/Common.hs
@@ -93,7 +93,6 @@ parsePkgIdBS bs =
       (vers, pkg') ->
           Just ( BS.reverse $ BS.tail pkg'
                , parseVer (BS8.unpack (BS.reverse vers)))
-      _ -> Nothing
 
 parseVer :: String -> Version
 parseVer vers = runReadP parseVersion vers
-- 
cgit v1.2.3