Gabriella439/optparse-generic
1
1
Fork 0
mirror of https://github.com/Gabriella439/optparse-generic.git synced 2024-10-04 09:07:32 +03:00
Code Issues Projects Releases Wiki Activity

Drop support for system-filepath (#106)

Browse Source 
Fixes https://github.com/Gabriella439/optparse-generic/issues/105
This commit is contained in:
Gabriella Gonzalez 2023-05-05 08:36:28 -06:00 committed by GitHub
parent 449bc40816
commit 7fe97693ae
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 1 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
optparse-generic.cabal
View File

@ -25,7 +25,6 @@ Library
Hs-Source-Dirs: src
Build-Depends:
base >= 4.8 && < 5 ,
system-filepath >= 0.3.1 && < 0.5 ,
text < 2.1 ,
transformers >= 0.2.0.0 && < 0.7 ,
transformers-compat >= 0.3 && < 0.8 ,

12
src/Options/Generic.hs
View File

@ -346,9 +346,8 @@ import Data.Tuple.Only (Only(..))
import Data.Typeable (Typeable)
import Data.Void (Void)
import Data.Word (Word8, Word16, Word32, Word64)
import Filesystem.Path (FilePath)
import GHC.Generics
import Prelude hiding (FilePath)
import Prelude
import Options.Applicative (Parser, ReadM)
import Data.Time
@ -370,7 +369,6 @@ import qualified Data.Time.Format.ISO8601 as ISO8601
import qualified Data.Typeable
import qualified Data.ByteString
import qualified Data.ByteString.Lazy
import qualified Filesystem.Path.CurrentOS as Filesystem
import qualified Options.Applicative as Options
import qualified Options.Applicative.Types as Options
import qualified Options.Applicative.NonEmpty as Options.NonEmpty
@ -556,10 +554,6 @@ instance ParseField Data.Text.Lazy.Text where
instance ParseField Data.ByteString.Lazy.ByteString where
parseField h m c d = fmap Data.Text.Lazy.Encoding.encodeUtf8 (parseField h m c d)
instance ParseField FilePath where
parseField h m c d = Filesystem.decodeString <$> parseHelpfulString "FILEPATH" h m c d
readField = Options.str
readISO8601Field :: forall a . (ParseField a, ISO8601 a) => ReadM a
readISO8601Field = Options.eitherReader reader
where
@ -648,7 +642,6 @@ instance ParseFields Data.ByteString.ByteString
instance ParseFields Data.ByteString.Lazy.ByteString
instance ParseFields Data.Text.Text
instance ParseFields Data.Text.Lazy.Text
instance ParseFields FilePath
instance ParseFields CalendarDiffDays
instance ParseFields Day
instance ParseFields UTCTime
@ -859,9 +852,6 @@ instance ParseRecord Any where
instance ParseRecord All where
parseRecord = fmap getOnly parseRecord
instance ParseRecord FilePath where
parseRecord = fmap getOnly parseRecord
instance ParseRecord Data.ByteString.ByteString where
parseRecord = fmap getOnly parseRecord