summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2015-03-29 01:06:34 -0400
committerjoe <joe@jerkface.net>2015-03-29 01:06:34 -0400
commitc88a76cb1c6ee7e54628b78a56f1a25415a39c30 (patch)
tree567ee2accc815e3f2a71c8f8434eefef82e60ef7 /examples
parente569586521be76e0f02137e01af9375d327d461c (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.hs4
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
29import System.Log 29import System.Log
30import System.Log.Logger 30import System.Log.Logger
31import Text.Read 31import Text.Read
32import Text.PrettyPrint.Class 32import Text.PrettyPrint.HughesPJClass hiding ((<>),($$))
33 33
34import Paths_bittorrent (version) 34import Paths_bittorrent (version)
35import Data.Torrent hiding (Magnet (Magnet)) 35import Data.Torrent hiding (Magnet (Magnet))
@@ -308,7 +308,7 @@ showInfo = info (helper <*> parser) modifier
308showTorrent :: ShowOpts -> Torrent -> ShowS 308showTorrent :: ShowOpts -> Torrent -> ShowS
309showTorrent ShowOpts {..} torrent 309showTorrent 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
313putTorrent :: ShowOpts -> IO () 313putTorrent :: ShowOpts -> IO ()
314putTorrent opts @ ShowOpts {..} = do 314putTorrent opts @ ShowOpts {..} = do