mirror of
https://github.com/Avi-D-coder/implicit-hie.git
synced 2024-11-22 17:55:51 +03:00
Transform dots to path seps
This commit is contained in:
parent
536b425950
commit
f5f699536e
@ -121,9 +121,10 @@ pathMain i p m o a =
|
||||
<|> (skipBlockLine i >> pathMain i p m o a)
|
||||
<|> pure
|
||||
( map (<//> m) p
|
||||
<> [ p' <//> (o' <> ".hs")
|
||||
<> [ p' <//> (o'' <> ".hs")
|
||||
| p' <- p,
|
||||
o' <- filter (`notElem` a) o
|
||||
o' <- filter (`notElem` a) o,
|
||||
let o'' = T.replace "." "/" o'
|
||||
]
|
||||
)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user