shake-plus-extended 0.2.0.0 → 0.2.0.1

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

• shake-plus-extended.cabal +1/−1
• src/Development/Shake/Plus/Extended/FileRules.hs +2/−2

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           shake-plus-extended-version:        0.2.0.0+version:        0.2.0.1 synopsis:       Experimental extensions to shake-plus description:    Experimental extensions to shake-plus - `within`-style file rules, HashMap and IxSet batch loaders. category:       development, shake

@@ -26,13 +26,13 @@  -- | Variant of `(%>)` that passes the local directory from the environment into the callback. (/%>) :: (MonadReader r m, HasLocalOut r, MonadRules m) => FilePattern -> ((Path Rel Dir, Path Rel File) -> RAction r ()) -> m ()-(/%>) xs ract = ask >>= \r -> do+(/%>) xs ract = R.ask >>= \r -> do   let d = view localOutL r   (toFilePath d <> xs) %> (stripProperPrefix d >=> \x -> ract (d, x))  -- | Variant of `(|%>)` that passes the local directory from the environment into the callback. (/|%>) :: (MonadReader r m, HasLocalOut r, MonadRules m) => [FilePattern] -> ((Path Rel Dir, Path Rel File) -> RAction r ()) -> m ()-(/|%>) xs ract = ask >>= \r -> do+(/|%>) xs ract = R.ask >>= \r -> do   let d = view localOutL r   ((toFilePath d <>) <$> xs) |%> (stripProperPrefix d >=> \x -> ract (d, x))