@@ -171,6 +171,7 @@ header = try $ do
171 subs <- many (try (string "sub"))
171 subs <- many (try (string "sub"))
172 base <- try (string "section" >> return 1) <|> (string "paragraph" >> return 4)
172 base <- try (string "section" >> return 1) <|> (string "paragraph" >> return 4)
173 optional (char '*')
173 optional (char '*')
174+ optional $ bracketedText '[' ']' -- alt title
175 title' <- manyTill inline (char '}')
176 title' <- manyTill inline (char '}')