Add support for reading typst pagebreak (#11126)

The pagebreak is parsed as a HorizontalRule inside a wrapper Div with class `page-break`.

Closes #11101.

Author: RayBB

src/Text/Pandoc/Readers/Typst.hs

@@ -396,6 +396,7 @@ blockHandlers = M.fromList
       getField "body" fields >>= pWithContents pBlocks)
   ,("pad", \_ _ fields ->  -- ignore paddingy
       getField "body" fields >>= pWithContents pBlocks)
+  ,("pagebreak", \_ _ _ -> pure $ B.divWith ("", ["page-break"], [("wrapper", "1")]) B.horizontalRule)
   ]
 
 inlineHandlers :: PandocMonad m =>

test/command/11101.md

@@ -0,0 +1,15 @@
+```
+% pandoc -f typst -t native
+First paragraph.
+
+#pagebreak()
+
+Second paragraph.
+^D
+[ Para [ Str "First" , Space , Str "paragraph." ]
+, Div
+    ( "" , [ "page-break" ] , [ ( "wrapper" , "1" ) ] )
+    [ HorizontalRule ]
+, Para [ Str "Second" , Space , Str "paragraph." ]
+]
+```