ABFTGY437DEHL75T3QTBO75N6SKNGEE6H6GOMVTLA2PBIYGUTACQC
ECXGMI6YGVJZGNZNJRG4DA7EHUOQAVDTGJH3UBPPHAGMB72AJ2ZAC
J4QXG3NCNCHLF2Z7FERKXPBZKL45MPMZQ2XLKPLURAOIRGHGF7IQC
7NUEWNIMPWOFZAMPOK7QJH2AGZGS2SYTPZ5MVFI24KQG23WKRA2AC
DOPKLXQZP3TDISHODQNI6GZ57EYE42NG225WHSZMQ3L355YVYPNAC
DRHZBHR7G5UEXWJNZ4FWF63YCUIYMIM3B7JEUL5CC4ZY2UKE3CJAC
KU4ZLSXGSY56RMJ3IAZ2M25OS5AAR3VK6IT665MWZFBJROQWU6SQC
44NEK2567V735JWLV2XABNGNW43WOIB5HSPVQJ6672TAP3K5VZZQC
WRLD7PACYNQI2F3MAYAM5OK4RHO7CZ4OMYWAZ37UQY2IJ4AYS7LAC
DN2F55HBRBTHQAJDU4GOOGAEAXH5MIFPQSPEK2NNAPDJPZOOFJFQC
2P34LOESTKTXTUTLVASZEKZ3VEFVHBJDZJ3LLAOGKH3GECC76LCQC
NOKOPRVXR4V57S3FQGD4JZEZWN4APFH2BNPKNX7B364I23NYD36AC
hunk = line $ foldr (\ch acc -> Text.append " " (unDiffR ch) : acc ) mempty changes
in DiffR $ Text.unlines [Text.stripEnd $ unDiffR content, Text.empty, header, hunk]
hunks = line $ foldr (\ch acc -> Text.append " " (unDiffR ch) : acc ) mempty changes
in DiffR $ Text.unlines [Text.stripEnd $ unDiffR content, Text.empty, header, hunks]