diff options
author | joe <joe@jerkface.net> | 2015-03-29 01:06:34 -0400 |
---|---|---|
committer | joe <joe@jerkface.net> | 2015-03-29 01:06:34 -0400 |
commit | c88a76cb1c6ee7e54628b78a56f1a25415a39c30 (patch) | |
tree | 567ee2accc815e3f2a71c8f8434eefef82e60ef7 /examples | |
parent | e569586521be76e0f02137e01af9375d327d461c (diff) |
Updates to build against newer libraries:
* prettyclass instead of deprecated pretty-class
* use pPrint instead of pretty
* backported to iproute-1.2.11 (convenient for debian jessie)
Diffstat (limited to 'examples')
-rw-r--r-- | examples/MkTorrent.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/MkTorrent.hs b/examples/MkTorrent.hs index 58e14af1..871343f9 100644 --- a/examples/MkTorrent.hs +++ b/examples/MkTorrent.hs | |||
@@ -29,7 +29,7 @@ import System.FilePath | |||
29 | import System.Log | 29 | import System.Log |
30 | import System.Log.Logger | 30 | import System.Log.Logger |
31 | import Text.Read | 31 | import Text.Read |
32 | import Text.PrettyPrint.Class | 32 | import Text.PrettyPrint.HughesPJClass hiding ((<>),($$)) |
33 | 33 | ||
34 | import Paths_bittorrent (version) | 34 | import Paths_bittorrent (version) |
35 | import Data.Torrent hiding (Magnet (Magnet)) | 35 | import Data.Torrent hiding (Magnet (Magnet)) |
@@ -308,7 +308,7 @@ showInfo = info (helper <*> parser) modifier | |||
308 | showTorrent :: ShowOpts -> Torrent -> ShowS | 308 | showTorrent :: ShowOpts -> Torrent -> ShowS |
309 | showTorrent ShowOpts {..} torrent | 309 | showTorrent ShowOpts {..} torrent |
310 | | infoHashOnly = shows $ idInfoHash (tInfoDict torrent) | 310 | | infoHashOnly = shows $ idInfoHash (tInfoDict torrent) |
311 | | otherwise = shows $ pretty torrent | 311 | | otherwise = shows $ pPrint torrent |
312 | 312 | ||
313 | putTorrent :: ShowOpts -> IO () | 313 | putTorrent :: ShowOpts -> IO () |
314 | putTorrent opts @ ShowOpts {..} = do | 314 | putTorrent opts @ ShowOpts {..} = do |