@@ -1168,12 +1168,13 @@ complexNatbibCitation mode = try $ do
11681168parseAligns :: LP [Alignment]
11691169parseAligns = try $ do
11701170 char '{'
1171− let maybeBar = try $ spaces >> optional (char '|')
1171+ let maybeBar = skipMany $ sp <|> () <$ char '|' <|> () <$ try (string "@{}")
11721172 maybeBar
11731173 let cAlign = AlignCenter <$ char 'c'
11741174 let lAlign = AlignLeft <$ char 'l'
11751175 let rAlign = AlignRight <$ char 'r'
1176− let alignChar = optional sp *> (cAlign <|> lAlign <|> rAlign)
1176+ let parAlign = AlignLeft <$ (char 'p' >> braced)
1177+ let alignChar = cAlign <|> lAlign <|> rAlign <|> parAlign
11771178 aligns' <- sepEndBy alignChar maybeBar
11781179 spaces
11791180 char '}'