@@ -396,7 +396,7 @@ lexTable :: PandocMonad m => SourcePos -> RoffLexer m RoffTokens
396396lexTable pos = do
397397 skipMany lexComment
398398 spaces
399− opts <- option [] tableOptions
399+ opts <- option [] $ try $ tableOptions <* char ';'
400400 case lookup "tab" opts of
401401 Just (c:_) -> modifyState $ \st -> st{ tableTabChar = c }
402402 _ -> modifyState $ \st -> st{ tableTabChar = '\t' }
@@ -448,7 +448,7 @@ tableRow = do
448448 return (c:cs)
449449
450450tableOptions :: PandocMonad m => RoffLexer m [TableOption]
451−tableOptions = try $ many tableOption <* spaces <* char ';'
451+tableOptions = many tableOption <* spaces
452452
453453tableOption :: PandocMonad m => RoffLexer m TableOption
454454tableOption = do