@@ -416,6 +416,7 @@ inlineCommands = M.fromList $
416416 , ("=", option (str "=") $ try $ tok >>= accent macron)
417417 , ("c", option (str "c") $ try $ tok >>= accent cedilla)
418418 , ("v", option (str "v") $ try $ tok >>= accent hacek)
419+ , ("u", option (str "u") $ try $ tok >>= accent breve)
419420 , ("i", lit "i")
420421 , ("\\", linebreak <$ (optional (bracketed inline) *> optional sp))
421422 , (",", pure mempty)
@@ -708,6 +709,21 @@ hacek 'Z' = 'Ž'
708709hacek 'z' = 'ž'
709710hacek c = c
710711
712+breve :: Char -> Char
713+breve 'A' = 'Ă'
714+breve 'a' = 'ă'
715+breve 'E' = 'Ĕ'
716+breve 'e' = 'ĕ'
717+breve 'G' = 'Ğ'
718+breve 'g' = 'ğ'
719+breve 'I' = 'Ĭ'
720+breve 'i' = 'ĭ'
721+breve 'O' = 'Ŏ'
722+breve 'o' = 'ŏ'
723+breve 'U' = 'Ŭ'
724+breve 'u' = 'ŭ'
725+breve c = c
726+
711727tok :: LP Inlines
712728tok = try $ grouped inline <|> inlineCommand <|> str <$> (count 1 $ inlineChar)
713729