-- fnString = "\\footnotetext{"
-- footnoteText :: Inline -> Maybe String
-- footnoteText (RawInline (Format "tex") s) =
--   if fnString `isPrefixOf` s
--     then Just . safeInit . drop (length fnString) $ s -- Remove closing brace
--     else Nothing
-- 
-- footnoteText x = Nothing




-----------------------------------------------------------------------------------------

safeInit [] = []
safeInit [] = []
safeInit [] = []