@@ -1320,7 +1320,7 @@ inlineCommands = M.union inlineLanguageCommands $ M.fromList $
13201320 , ("i", lit "i")
13211321 , ("\\", linebreak <$ (do inTableCell <- sInTableCell <$> getState
13221322 guard $ not inTableCell
1323− optional (bracketed inline)
1323+ optional opt
13241324 spaces))
13251325 , (",", lit "\8198")
13261326 , ("@", pure mempty)
@@ -1750,7 +1750,7 @@ include = do
17501750 (Tok _ (CtrlSeq name) _) <-
17511751 controlSeq "include" <|> controlSeq "input" <|>
17521752 controlSeq "subfile" <|> controlSeq "usepackage"
1753− skipMany $ bracketed inline -- skip options
1753+ skipMany opt
17541754 fs <- (map (T.unpack . removeDoubleQuotes . T.strip) . T.splitOn "," .
17551755 untokenize) <$> braced
17561756 let fs' = if name == "usepackage"
@@ -2355,7 +2355,7 @@ hline = try $ do
23552355 controlSeq "endhead" <|>
23562356 controlSeq "endfirsthead"
23572357 spaces
2358− optional $ bracketed inline
2358+ optional opt
23592359 return ()
23602360
23612361lbreak :: PandocMonad m => LP m Tok