aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2025-07-29 17:24:19 -0700
committerJohn MacFarlane <[email protected]>2025-07-29 17:24:19 -0700
commitf5262d88e492802169a03efffd8c3ce292cfce9c (patch)
tree603d3b7da0318d58594872aad6eb11288539b156
parent9d56205784d529b0c409e2c27876a541eae432f5 (diff)
TikiWiki reader: Use getVerbosity instead of getCommonState.
-rw-r--r--src/Text/Pandoc/Readers/TikiWiki.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/TikiWiki.hs b/src/Text/Pandoc/Readers/TikiWiki.hs
index a9082b657..ba09ccb6f 100644
--- a/src/Text/Pandoc/Readers/TikiWiki.hs
+++ b/src/Text/Pandoc/Readers/TikiWiki.hs
@@ -24,8 +24,7 @@ import Data.Maybe (fromMaybe)
import Data.Text (Text)
import qualified Data.Text as T
import qualified Text.Pandoc.Builder as B
-import Text.Pandoc.Class.CommonState (CommonState (..))
-import Text.Pandoc.Class.PandocMonad (PandocMonad (..))
+import Text.Pandoc.Class.PandocMonad (PandocMonad (..), getVerbosity)
import Text.Pandoc.Definition
import Text.Pandoc.Logging (Verbosity (..))
import Text.Pandoc.Options
@@ -71,7 +70,7 @@ parseTikiWiki = do
block :: PandocMonad m => TikiWikiParser m B.Blocks
block = do
- verbosity <- getsCommonState stVerbosity
+ verbosity <- getVerbosity
pos <- getPosition
res <- mempty <$ skipMany1 blankline
<|> blockElements