@@ -965,6 +965,15 @@ hacek c = [c]
966ogonek :: Char -> String
966ogonek :: Char -> String
967ogonek 'a' = "ą"
967ogonek 'a' = "ą"
968ogonek c = [c]
977ogonek c = [c]
970breve :: Char -> String
979breve :: Char -> String
@@ -1293,6 +1302,7 @@ inlineCommands = M.fromList $
1293 , ("v", accent 'ˇ' hacek)
1302 , ("v", accent 'ˇ' hacek)
1294 , ("u", accent '\774' breve)
1303 , ("u", accent '\774' breve)
1295 , ("k", accent '\808' ogonek)
1304 , ("k", accent '\808' ogonek)
1305+ , ("textogonekcentered", accent '\808' ogonek)
1296 , ("i", lit "i")
1306 , ("i", lit "i")
1297 , ("\\", linebreak <$ (do inTableCell <- sInTableCell <$> getState
1307 , ("\\", linebreak <$ (do inTableCell <- sInTableCell <$> getState
1298 guard $ not inTableCell
1308 guard $ not inTableCell