diff options
Diffstat (limited to 'src/Data/Torrent/Client.hs')
-rw-r--r-- | src/Data/Torrent/Client.hs | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/Data/Torrent/Client.hs b/src/Data/Torrent/Client.hs index 6437cbbf..f21a5e92 100644 --- a/src/Data/Torrent/Client.hs +++ b/src/Data/Torrent/Client.hs | |||
@@ -26,13 +26,9 @@ module Data.Torrent.Client | |||
26 | , libClientInfo | 26 | , libClientInfo |
27 | ) where | 27 | ) where |
28 | 28 | ||
29 | import Control.Applicative | ||
30 | import Data.ByteString as BS | ||
31 | import Data.ByteString.Char8 as BC | ||
32 | import Data.Default | 29 | import Data.Default |
33 | import Data.List as L | 30 | import Data.List as L |
34 | import Data.List.Split as L | 31 | import Data.List.Split as L |
35 | import Data.Maybe | ||
36 | import Data.Monoid | 32 | import Data.Monoid |
37 | import Data.String | 33 | import Data.String |
38 | import Data.Text as T | 34 | import Data.Text as T |
@@ -40,8 +36,11 @@ import Data.Version | |||
40 | import Text.PrettyPrint hiding ((<>)) | 36 | import Text.PrettyPrint hiding ((<>)) |
41 | import Text.PrettyPrint.Class | 37 | import Text.PrettyPrint.Class |
42 | import Text.Read (readMaybe) | 38 | import Text.Read (readMaybe) |
43 | import Paths_bittorrent (version) | 39 | -- import Paths_bittorrent (version) |
44 | 40 | ||
41 | -- TODO FIXME | ||
42 | version :: Version | ||
43 | version = Version [0, 0, 0, 3] [] | ||
45 | 44 | ||
46 | -- | List of registered client versions + 'IlibHSbittorrent' (this | 45 | -- | List of registered client versions + 'IlibHSbittorrent' (this |
47 | -- package) + 'IUnknown' (for not recognized software). All names are | 46 | -- package) + 'IUnknown' (for not recognized software). All names are |