hexpat-pickle-generic 0.1.6 → 0.1.7
raw patch · 2 files changed
+3/−11 lines, 2 files
Files
hexpat-pickle-generic.cabal view
@@ -1,5 +1,5 @@ name: hexpat-pickle-generic-version: 0.1.6+version: 0.1.7 synopsis: Picklers for de/serialising Generic data types to and from XML license: BSD3 license-file: LICENSE
src/Text/XML/Expat/Pickle/Generic.hs view
@@ -441,16 +441,8 @@ , unpickleTree = unpickleTree pu . mconcat . map extract } where- extract (Element _ _ cs) = strip . mconcat $ map extract cs- extract (Text txt) = strip txt-- strip = snd . BS.break valid . fst . BS.breakEnd valid-- valid c- | isSpace c = False- | c == '\r' = False- | c == '\n' = False- | otherwise = True+ extract (Element _ _ cs) = mconcat $ map extract cs+ extract (Text txt) = txt -- -- Instances