summaryrefslogtreecommitdiff
path: root/examples/MkTorrent.hs
diff options
context:
space:
mode:
authorSam Truzjan <pxqr.sta@gmail.com>2014-01-09 05:58:21 +0400
committerSam Truzjan <pxqr.sta@gmail.com>2014-01-09 05:58:21 +0400
commit111c72d3b8dda678cd34938aad7a52e744c560c0 (patch)
treea24a6da6ee3355cddfc82cdd83d70d471a9d32d1 /examples/MkTorrent.hs
parent3cc3e07e6db83b4b213d84c79dcb4b3aa1331b6c (diff)
Add TODOs to mktorrent utility
Diffstat (limited to 'examples/MkTorrent.hs')
-rw-r--r--examples/MkTorrent.hs9
1 files changed, 9 insertions, 0 deletions
diff --git a/examples/MkTorrent.hs b/examples/MkTorrent.hs
index ab3144b4..124bb996 100644
--- a/examples/MkTorrent.hs
+++ b/examples/MkTorrent.hs
@@ -156,6 +156,7 @@ amend (AmendOpts tpath) = do
156{----------------------------------------------------------------------- 156{-----------------------------------------------------------------------
157-- Check command -- validate content files using torrent file 157-- Check command -- validate content files using torrent file
158-----------------------------------------------------------------------} 158-----------------------------------------------------------------------}
159-- TODO progress bar
159 160
160data CheckOpts = CheckOpts 161data CheckOpts = CheckOpts
161 { checkTorrentPath :: FilePath -- ^ validation torrent file 162 { checkTorrentPath :: FilePath -- ^ validation torrent file
@@ -214,6 +215,14 @@ checkTorrent CheckOpts {..} = do
214{----------------------------------------------------------------------- 215{-----------------------------------------------------------------------
215-- Create command 216-- Create command
216-----------------------------------------------------------------------} 217-----------------------------------------------------------------------}
218-- TODO progress bar
219-- TODO multifile torrents
220-- TODO interactive mode
221-- TODO non interactive mode
222-- TODO --ignore-dot-files
223-- TODO --md5
224-- TODO --piece-size
225
217{- 226{-
218createFlags :: Parser CreateFlags 227createFlags :: Parser CreateFlags
219createFlags = CreateFlags 228createFlags = CreateFlags