@@ -2296,6 +2296,7 @@ environments = M.fromList
22962296 , ("minted", minted)
22972297 , ("obeylines", obeylines)
22982298 , ("tikzpicture", rawVerbEnv "tikzpicture")
2299+ , ("lilypond", rawVerbEnv "lilypond")
22992300 -- etoolbox
23002301 , ("ifstrequal", ifstrequal)
23012302 , ("newtoggle", braced >>= newToggle)
@@ -2338,7 +2339,7 @@ rawVerbEnv :: PandocMonad m => Text -> LP m Blocks
23382339rawVerbEnv name = do
23392340 pos <- getPosition
23402341 (_, raw) <- withRaw $ verbEnv name
2341− let raw' = "\\begin{" ++ name ++ "}" ++ toksToString raw
2342+ let raw' = "\\begin{" ++ T.unpack name ++ "}" ++ toksToString raw
23422343 exts <- getOption readerExtensions
23432344 let parseRaw = extensionEnabled Ext_raw_tex exts
23442345 if parseRaw