diff options
Diffstat (limited to 'dev-haskell/idiii/files/idiii-0.1.3.3-fold.patch')
| -rw-r--r-- | dev-haskell/idiii/files/idiii-0.1.3.3-fold.patch | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/dev-haskell/idiii/files/idiii-0.1.3.3-fold.patch b/dev-haskell/idiii/files/idiii-0.1.3.3-fold.patch new file mode 100644 index 000000000000..0bd0469e53af --- /dev/null +++ b/dev-haskell/idiii/files/idiii-0.1.3.3-fold.patch @@ -0,0 +1,7 @@ +--- a/src/ID3/Type/Tag.hs ++++ b/src/ID3/Type/Tag.hs +@@ -89,3 +89,3 @@ getActualSize t = (footerSize t) + (framesSize (t^.frames)) + (extHSize t) + framesSize :: Map FrameID ID3Frame -> FrameSize +-framesSize fs = Map.fold (\fr x -> fr^.frHeader^.frSize + 10 + x) 0 fs ++framesSize fs = Map.foldr (\fr x -> fr^.frHeader^.frSize + 10 + x) 0 fs + footerSize :: ID3Tag -> Integer |