diff options
| author | Daniel Gröber <dxld@darkboxed.org> | 2018-10-26 04:21:38 +0200 |
|---|---|---|
| committer | Daniel Gröber <dxld@darkboxed.org> | 2018-10-27 20:48:56 +0200 |
| commit | 914d428ff1a1529b98206f9f3575c88ade7ea38b (patch) | |
| tree | 50773c24714b73ab1a655ee3cc344d4b1655d44a /src/CabalHelper/Shared/Common.hs | |
| parent | 385685dc9da4d95e39e17a323a69d12f1204c951 (diff) | |
Split up Compile.hs into multiple modules
Diffstat (limited to 'src/CabalHelper/Shared/Common.hs')
| -rw-r--r-- | src/CabalHelper/Shared/Common.hs | 9 |
1 files changed, 0 insertions, 9 deletions
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 |