@@ -370,7 +370,7 @@ inlineToParElems (Note blks) = do
370370 modify $ \st -> st { stNoteIds = M.insert curNoteId blks notes }
371371 local (\env -> env{envRunProps = (envRunProps env){rLink = Just $ InternalTarget endNotesSlideId}}) $
372372 inlineToParElems $ Superscript [Str $ tshow curNoteId]
373−inlineToParElems (Span (_, ["underline"], _) ils) =
373+inlineToParElems (Underline ils) =
374374 local (\r -> r{envRunProps = (envRunProps r){rPropUnderline=True}}) $
375375 inlinesToParElems ils
376376inlineToParElems (Span _ ils) = inlinesToParElems ils