aboutsummaryrefslogtreecommitdiff
path: root/Text
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-01-24 19:58:26 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-01-24 19:58:26 +0000
commit720e9ce3a5c822dc800adc862c20f098ab602902 (patch)
treeb82ed90f9a54eb3ecddc127e1522e6d27a88eee7 /Text
parent066e1cfe90090f1f45dd00194805cdae7c8774e9 (diff)
downloadpandoc-720e9ce3a5c822dc800adc862c20f098ab602902.tar.gz
Renamed processIn -> processWith, queryIn -> queryWith.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1521 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text')
-rw-r--r--Text/Pandoc/Definition.hs22
-rw-r--r--Text/Pandoc/Plugins.hs4
2 files changed, 13 insertions, 13 deletions
diff --git a/Text/Pandoc/Definition.hs b/Text/Pandoc/Definition.hs
index ed58f6b75..92ce094d4 100644
--- a/Text/Pandoc/Definition.hs
+++ b/Text/Pandoc/Definition.hs
@@ -129,22 +129,22 @@ data Inline
deriving (Show, Eq, Read, Typeable, Data)
-- | Applies a transformation on @a@s to matching elements in a @b@.
-processIn :: (Data a, Data b) => (a -> a) -> b -> b
-processIn f = everywhere (mkT f)
+processWith :: (Data a, Data b) => (a -> a) -> b -> b
+processWith f = everywhere (mkT f)
--- | Like 'processIn', but with monadic transformations.
-processInM :: (Monad m, Data a, Data b) => (a -> m a) -> b -> m b
-processInM f = everywhereM (mkM f)
+-- | Like 'processWith', but with monadic transformations.
+processWithM :: (Monad m, Data a, Data b) => (a -> m a) -> b -> m b
+processWithM f = everywhereM (mkM f)
-- | Runs a query on matching @a@ elements in a @c@.
-queryIn :: (Data a, Data c) => (a -> [b]) -> c -> [b]
-queryIn f = everything (++) ([] `mkQ` f)
+queryWith :: (Data a, Data c) => (a -> [b]) -> c -> [b]
+queryWith f = everything (++) ([] `mkQ` f)
-{-# DEPRECATED processPandoc "Use processIn instead" #-}
+{-# DEPRECATED processPandoc "Use processWith instead" #-}
processPandoc :: Data a => (a -> a) -> Pandoc -> Pandoc
-processPandoc = processIn
+processPandoc = processWith
-{-# DEPRECATED queryPandoc "Use queryIn instead" #-}
+{-# DEPRECATED queryPandoc "Use queryWith instead" #-}
queryPandoc :: Data a => (a -> [b]) -> Pandoc -> [b]
-queryPandoc = queryIn
+queryPandoc = queryWith
diff --git a/Text/Pandoc/Plugins.hs b/Text/Pandoc/Plugins.hs
index 5ba333faa..cb8ad1e11 100644
--- a/Text/Pandoc/Plugins.hs
+++ b/Text/Pandoc/Plugins.hs
@@ -65,5 +65,5 @@ evaluatePlugin modsrc = do
throwError $ UnknownError $ "The plugin module must define a function 'transform'."
transformType <- typeOf "transform"
if "-> IO" `isInfixOf` transformType
- then interpret "processInM transform" (as :: Pandoc -> IO Pandoc)
- else interpret "return . (processIn transform)" (as :: Pandoc -> IO Pandoc)
+ then interpret "processWithM transform" (as :: Pandoc -> IO Pandoc)
+ else interpret "return . (processWith transform)" (as :: Pandoc -> IO Pandoc)