@@ -478,7 +478,6 @@ inline = choice [ str
478 , accentedChar
478 , accentedChar
479 , nonbreakingSpace
479 , nonbreakingSpace
482 , specialChar
481 , specialChar
483 , rawLaTeXInline'
482 , rawLaTeXInline'
484 , escapedChar
483 , escapedChar
@@ -815,12 +814,6 @@ footnote = try $ do
815cite :: GenParser Char ParserState Inline
814cite :: GenParser Char ParserState Inline
816cite = simpleCite <|> complexNatbibCites
815cite = simpleCite <|> complexNatbibCites
818−index :: GenParser Char ParserState Inline
820− (name, _, _) <- command
821− guard $ name == "index"
824simpleCiteArgs :: GenParser Char ParserState [Citation]
817simpleCiteArgs :: GenParser Char ParserState [Citation]
825simpleCiteArgs = try $ do
818simpleCiteArgs = try $ do
826 first <- optionMaybe $ (char '[') >> manyTill inline (char ']')
819 first <- optionMaybe $ (char '[') >> manyTill inline (char ']')