mkParseResult xmlString = either (const Nothing) Just $ xmlParse' "" xmlString
mkParseResult xmlString = either (const Nothing) Just $ xmlParse' "" xmlString
mkParseResult xmlString = either (const Nothing) Just $ xmlParse' "" xmlString