Skip to content

Commit 695adf6

Browse files
deps: bump base lower bound and dispel warnings
1 parent 1c7b06e commit 695adf6

File tree

3 files changed

+4
-6
lines changed

3 files changed

+4
-6
lines changed

Config/Dyre/Options.hs

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -121,10 +121,9 @@ customOptions otherArgs = do
121121
-- | Look for the given flag in the argument array, and store
122122
-- its value under the given name if it exists.
123123
storeFlag :: [String] -> String -> String -> IO ()
124-
storeFlag args flag name
125-
| null match = return ()
126-
| otherwise = putValue "dyre" name $ drop (length flag) (head match)
127-
where match = filter (isPrefixOf flag) args
124+
storeFlag args flag name = case filter (isPrefixOf flag) args of
125+
[] -> pure ()
126+
h:_ -> putValue "dyre" name $ drop (length flag) h
128127

129128
-- | The array of all arguments that Dyre recognizes. Used to
130129
-- make sure none of them are visible past 'withDyreOptions'

Config/Dyre/Relaunch.hs

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -33,7 +33,6 @@ module Config.Dyre.Relaunch
3333
) where
3434

3535
import Data.Maybe ( fromMaybe )
36-
import System.IO ( writeFile, readFile )
3736
import Data.Binary ( Binary, encodeFile, decodeFile )
3837
import Control.Exception ( try, SomeException )
3938
import System.FilePath ( (</>) )

dyre.cabal

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -52,7 +52,7 @@ library
5252
Config.Dyre.Compile,
5353
Config.Dyre.Relaunch
5454
build-depends:
55-
base >= 4.8 && < 5
55+
base >= 4.18 && < 5
5656
, binary
5757
, directory >= 1.2.0.0
5858
, executable-path

0 commit comments

Comments
 (0)