summaryrefslogtreecommitdiff
path: root/src/Data/Torrent/Layout.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Data/Torrent/Layout.hs')
-rw-r--r--src/Data/Torrent/Layout.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Data/Torrent/Layout.hs b/src/Data/Torrent/Layout.hs
index 7ed8679d..a32d74fa 100644
--- a/src/Data/Torrent/Layout.hs
+++ b/src/Data/Torrent/Layout.hs
@@ -81,8 +81,6 @@ import Text.PrettyPrint.Class
81import System.FilePath 81import System.FilePath
82import System.Posix.Types 82import System.Posix.Types
83 83
84import Data.Torrent.Block
85
86 84
87{----------------------------------------------------------------------- 85{-----------------------------------------------------------------------
88-- File attribytes 86-- File attribytes
@@ -274,7 +272,7 @@ fileCount MultiFile {..} = L.length liFiles
274 272
275-- | Find number of blocks of the specified size. If torrent size is 273-- | Find number of blocks of the specified size. If torrent size is
276-- not a multiple of block size then the count is rounded up. 274-- not a multiple of block size then the count is rounded up.
277blockCount :: BlockSize -> LayoutInfo -> Int 275blockCount :: Int -> LayoutInfo -> Int
278blockCount blkSize ci = contentLength ci `sizeInBase` blkSize 276blockCount blkSize ci = contentLength ci `sizeInBase` blkSize
279 277
280{----------------------------------------------------------------------- 278{-----------------------------------------------------------------------