more OsPath conversion
Sponsored-by: mycroft
This commit is contained in:
parent
917c43f31f
commit
22c2451e26
11 changed files with 46 additions and 44 deletions
2
Key.hs
2
Key.hs
|
@ -86,7 +86,7 @@ instance Arbitrary KeyData where
|
|||
|
||||
instance Arbitrary AssociatedFile where
|
||||
arbitrary = AssociatedFile
|
||||
. fmap (toRawFilePath . fromTestableFilePath)
|
||||
. fmap (toOsPath . fromTestableFilePath)
|
||||
<$> arbitrary
|
||||
|
||||
instance Arbitrary Key where
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue