From 914d428ff1a1529b98206f9f3575c88ade7ea38b Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
Date: Fri, 26 Oct 2018 04:21:38 +0200
Subject: Split up Compile.hs into multiple modules

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

(limited to 'src/CabalHelper/Shared/Common.hs')

diff --git a/src/CabalHelper/Shared/Common.hs b/src/CabalHelper/Shared/Common.hs
index d60e745..4165ab0 100644
--- a/src/CabalHelper/Shared/Common.hs
+++ b/src/CabalHelper/Shared/Common.hs
@@ -134,15 +134,6 @@ appCacheDir =
     windowsCache = "Local Settings" </> "Cache"
     unixCache = ".cache"
 
-isCabalFile :: FilePath -> Bool
-isCabalFile f = takeExtension' f == ".cabal"
-
-takeExtension' :: FilePath -> String
-takeExtension' p =
-    if takeFileName p == takeExtension p
-      then "" -- just ".cabal" is not a valid cabal file
-      else takeExtension p
-
 replace :: String -> String -> String -> String
 replace n r hs' = go "" hs'
  where
-- 
cgit v1.2.3